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

##</code><code>##

print <<"END_OF_FORM";
  <FORM METHOD="post" ENCTYPE="multipart/form-data">
  <INPUT TYPE="FILE" SIZE="25" NAME="UPLOAD">
  <input type="hidden" name="login" value="$login">
  <input type="hidden" name="password" value="$password">
  <input type="submit" value=" Send File ">
END_OF_FORM