Select Code to Download

use CGI;
$q = new CGI;
...
   print $q->redirect('http://www.foo.bar');
}

if ($q->param('foo')) {
    #do stuff if has stuff in field
...
   print "<input type=text name=bar value=$bar>";

}