pq+2007-10-29 13:07:22--

vermutlich kommt nix an, weil du vorher den dateihandle ausliest.
mach nach der testausgabe mal ein seek:

Code (perl): (dl )

1
2
3
4
5

use Fcntl qw(:seek);
...
print while <$file>; # hiernach ist $file am ende angelangt
seek $file, 0, SEEK_SET; # springe wieder an den anfang
$ftp->put($file, ...);

damit faengt perl dann wieder von vorne an zu lesen.

Das ist interessant, das wusste ich noch gar nicht.
Ich muss mich aber entschuldigen, ich habe die Aufgabe missverstanden, es soll ein Upload mit CGI sein und nicht auf den FTP.
Und nach der Feststellung, dass der bsolute Zielpfad angegeben werden muss und nicht http://localhost/irgendeinordner klappt die Sache auch *uff*