Thread Ein bisschen AJAX mit Perl
(23 answers)
Opened by cbxk1xg at 2008-09-09 20:27
Hallo Freunde der Sonne,
ich habe ein kleines Upload-Script und möchte dem User wärend des Uploads einen Status-Bar anzeigen. Den Javascript-Teil selbst bekomme ich hin. Das ist nicht so schlimm. Meine Idee war nun, ich erzeuge eine Session-ID, benenne die Datei des User in die Session-ID um und frage alle x Sekunden ab, wie groß die Datei auf dem Server ist. Also: User wählt im HTML-Formular eine Datei aus (meinvideo.mpg), ich mache daraus (4092859932717.mpg) und schaue mir dann die Dateigröße an. Nun kommt jedoch das große ABER... Die Datei erscheint nicht im gewünschten Verzeichnis, ist also gar nicht vorhanden, bis der Upload komplett ist. - Aber Warum??? Die Datei schreibe ich wie folgt auf den (Linux-)Server: Code (perl): (dl
)
1 2 3 4 5 6 7 8 use CGI qw/:standard/; $CGI::POST_MAX=1024 * $MaxSize; my $serverFile = $UploadDir . (split(/[\\\/]/, param('UserVideo')))[-1]; my $buffer; open (FILE,">$serverFile"); while (my $bytesread=read($filename,$buffer,1024)) {print FILE $buffer;} close (FILE); Wo liegt mein Denkfehler? |