File Upload mit CGI.PM

[kiliani]

Hallo CGI- und PERL' ler,

Ein JPG Image soll auf den Server hoch, und ich will den Code von Lincoln Stein (CGI.PM) verwenden:

$file_name ist der Name des FileInputFeldes ausm Formular

method=post enctype="multipart/form-data" wurde auch notiert

Es soll nun das hochgeladene Image aufm Server gespeichert werden

---schnipp--->

open (OUTFILE,">/temp/test.jpg");
while (read($file_name, $buffer, 1024000)) {
print OUTFILE $buffer;
}      
close OUTFILE;
<---schnapp---<

Das Problem: Es wird eine Datei "test.jpg" im angegebenem Pfad zwar angelegt, jedoch mit der falschen Größe, statt 32,6 KB z.B. 32,7 KB und das Image ist damit futsch.

Der Server OmniHttpd läuft unter NT40, Perl ist Ver: 5.005_02, das Ganze soll später mit dem IIS4 zugange kommen...

Meine Frage: Geht da was unter NT nicht oder mach ich da was falsch???

Servus, kiliani

[Michael Schröpl]

Das Problem: Es wird eine Datei "test.jpg" im angegebenem Pfad zwar angelegt, jedoch mit der falschen Größe, statt 32,6 KB z.B. 32,7 KB und das Image ist damit futsch.
Meine Frage: Geht da was unter NT nicht oder mach ich da was falsch???

Klingt nach fehlendem "binmode" beim Öffnen der Ausgabedatei ...

[kiliani]

Das Problem: Es wird eine Datei "test.jpg" im angegebenem Pfad zwar angelegt, jedoch mit der falschen Größe, statt 32,6 KB z.B. 32,7 KB und das Image ist damit futsch.
Meine Frage: Geht da was unter NT nicht oder mach ich da was falsch???

Klingt nach fehlendem "binmode" beim Öffnen der Ausgabedatei ...

Stimmt Michael, ich hab das mittlerweile auch gefunden, jedoch noch nicht getestet.

Vielen Dank für Dein Feedback, kiliani

PS:
Hier noch einmal die Stein-Seite für CGI.PM USER:

http://stein.cshl.org/WWW/software/CGI/cgi_docs.html