Select Code to Download

<FORM METHOD="POST"  ACTION="foo.cgi">
<INPUT TYPE="text" NAME="foo"><P>
<INPUT TYPE="text" NAME="bar">
<INPUT TYPE="submit">
</FORM>

#!perl

...
print $q->param('foo').$q->param('bar');

print $q->end_html;