Select Code to Download

print "<FORM METHOD='post' ACTION='RecieverURL'>";
print "<INPUT SIZE=20 TYPE='textbox' NAME='name' VALUE=''>";
...
print "<INPUT TYPE='submit' VALUE='submit'>";
print "</FORM>";

use vars qw(%in);
ReadParse();
...

print "name = $name";
print "passwd = $passwd";