simple script question

[Benson]

I'm customizing a mailing list perl script for quicker usage..

In the following, how can I put default values in the script? I want to make some radio buttons checked by default and put some text in the text boxes..

[quote]
print "Subject: <input type=\"text\" name=\"subject\" size=40>

\n";
print "Use salutation?
\n";
print "<input type=\"radio\" name=\"usename\" value=\"yes\">Yes\n";
print "<input type=\"radio\" name=\"usename\" value=\"no\">No

\n";

print "Of the form:
\n";
print "<input type=\"text\" name=\"beforename\" size=20>\n";
print "NAME\n";
print "<input type=\"text\" name=\"aftername\" size=20>

\n";
[\quote]

------------------
ICQ#8418658-alba gu brath!

[Deb]

For type=Text areas add Value="Whatever You Want"
This will make the Value= the dafault

To have a radio button checked
type=radio CHECKED name="....



Deb

[Benson]

Thanks Deb, works great - though it took me a couple of minutes to realize that some "\" were needed to precede the quotation marks in the value fields..

cheers

[ChrisH]

You can use qq in perl to avoid all
this quoting, too. For example,

print "value=\"true\"";

print qq!value="true"!;

print qq/value="true"/;

are all the same. The qq uses the
next character instead of the "
character. Handy for cases like this.

ch

[Benson]

aha..ok thanks. Perl and I aren't on a first name basis, exactly!

[Justin]

A side note about HTML - you don't have to quote all of the values. The general rule is if there is white space in a value, quote it, otherwise you don't have to.

print "Subject: <input type=text name=subject size=40>

\n";
print "<input type=radio name=username value=yes>Yes\n";

And so on. I only qupte URL's or whitespace, and all browsers I've used accept it just fine. And if I'm not mistaken, the browser can actually render numbers (even colors) quicker when not quoted, because they must be converted from a literal string into a value - but that's a whole different issue

Also, you can do this:

print <<End;
Subject: <input type=text name=subject size=40>
blah blah blah
"blah"
etc
End

That will work and eliminate having to escape quotes, type new lines, and semicolons. Also makes for nicer formatting in your code, too


------------------
Justin Nelson, SFE Software
www.vdj.net

[Terra]

I agree with Justin, HERE docs rock!

Nothing worse than having carefully crafted Perl code, mucked up by all that gui (gooey) html stuff...

Deb, keep yer mits off my code!

--
Terra
--Deb, it's a $16.00 fine for dipping your hands in the cookie jar--
FutureQuest

[Deb]

Thanks a lot JUSTIN! Now ya got me in trouble

[Benson]

[ucode]print <<End;
Subject: <input type=text name=subject size=40>
blah blah blah
"blah"
etc
End[/quote]

This works well 8)

[This message has been edited by Benson (edited 03-09-99).]

[Benson]

Something doesn't look quite right ^^



------------------
I'd rather have a bottle in front
of me than a frontal lobotomy