#########################################################################################################

<schnipp>
<FORM METHOD="POST" ACTION="http://www.xyz.de/cgi-bin/baseportal.pl?htx=/uploader" ENCTYPE="multipart/form-data" target="vorschaubild" name="vorschaubild">
<INPUT TYPE="hidden" NAME="mode=" value="binary">
<INPUT TYPE="file" NAME="uploaded_file=" SIZE=30 MAXLENGTH=80>
<TABLE BORDER=0>
<TR>
<TD style='font-family:Arial;color:#FFFFFF;font-size:10.0pt'>Speichern:</TD>
<TD style='font-family:Arial;color:#FFFFFF;font-size:10.0pt'><INPUT TYPE="radio" NAME="status=" checked value="write">wenn schon eine Datei besteht diese nicht überschreiben</TD>
</TR>
<TR>
<TD></TD>
<TD style='font-family:Arial;color:#FFFFFF;font-size:10.0pt'><INPUT TYPE="radio" NAME="status=" value="overwrite">
bestehende Datei überschreiben</TD>
</TR>
</TABLE>
<INPUT TYPE="submit" NAME="button" VALUE="Bild hochladen">
</FORM>
<schnapp>

<schnipp>
<perl>

out "Bin drin<br>";
out $mode."<br>";
out $uploaded_file."<br>";
out $status."<br>";

out "Bin im schreiben hier<br>";
binmode FILE;
binmode $fh;

{ 
print FILE $buffer; 
}

</perl>
<schnapp>