Help for this page
#!/usr/bin/perl -w use strict; ... close(FILE); print "File saved as $localfilename (original filename=$filename)<br>" +; print "</body></html>";
<html> <body> ... </form> </body> </html>