Help for this page

Select Code to Download

Select or download this

#!c:\perl\bin\perl.exe
$| = 1; #Not sure what it does, but it works :) 
...
print "Successful Upload<p>File:$file ($file_type, $bytesread bytes)<B
+R>\n"; 
}
exit; #exit's script

Select or download this
```
<HTML>
<HEAD>
...

</BODY>
</HTML>
```