or download this
print "<FORM METHOD=\"post\" ENCTYPE=\"multipart/form-data\">\n";
print "<INPUT TYPE=\"FILE\" SIZE=\"25\" NAME=\"UPLOAD\">\n";
...
print "<input type=\"hidden\" name=\"password\" value=\"$password\">\n
+";
print "<input type=\"submit\" value=\" Send File \">\n";
print "</FORM>\n";