Perl file open

[Tomi (Gast)]

Hallo.

Habe ein Problem mit File upload über Perl

Habe eine html Seite mit:
<input type="file" name="bild" maxlength="255" value="" size=40>

Dort kann ich mir jetzt ein File selektieren.Z.B. c:/tmp/test.jpg

Nun rufe ich über method=post mein perl script auf.
Im perl script versuch ich den Filename in einen String zu schreiben.
my $File_Handle = $$query->param('bild');

Mein Problem ist das in $File_Handle nur der Dateiname steht (test.jpg).

Wie komme ich jetzt an den Path ran damit ich das file öffnen kann?

Danke.

BYE
thomas

[Tim (Gast)]

hi!

Welches Perl Modul stellt bei dir denn "$query->param('bild')" bereit?

[Martin (Gast)]

Hallo Tomi,

es sieht mir ganz danach aus, als wolltest Du CGI.pm benutzen. Wie aus 
perldoc CGI zu ersehen (einfach mal nach upload suchen), ist die 
zurückgegebene Variable sowohl als String, als auch als Filehandle zu 
gebrauchen:

$filename = $query->param('uploaded_file');

#zeilenweises Einlesen:
while (<$filename>)
{
...
}

Ansonsten achte am besten auch darauf , dass das Formular den richtigen 
Typ hat (z.B. mit start_multipart_form())

Gruß,
Martin