Help for this page

Select Code to Download

Select or download this

<HTML>
<HEAD><TITLE>Upload Form</TITLE></HEAD>
...
</FORM>
</CENTER></BODY>
</HTML>

Select or download this

#!/usr/bin/perl -w

...
  print $Q->h1("File is $File");
  print $Q->end_html;
}