(Hallo|Hi(ho)|Nabend) Jan,
Ich weiß wie das funktioniert allerdings muss dazu dieses Code ausgeführt werden bevor der Upload ausgeführt wird.
Dann scheinst du doch nicht zu wissen, wie es funktioniert.
Leider ist zumindest dieser Teil des CGI-Moduls spärlich dokumentiert.
Also zumindest gibt es keine kostenfreien Quellen im WWW.
Ganz kurz: Schreib eine Funktion, welche die entsprechenden Parameter entgegennimmt und auswertet.
Die hängst du dann beim Erzeugen des CGI-Objektes ein:
# upload-hook for CGI.pm
sub upload_hook {
my (
$file_name, # temp file name
$buffer, #
$bytes_read,
$umid
) = @_;
# ... verarbeite diese Daten
}
# ...
my $cgi = CGI->new(\&upload_hook);
# ...
UberUploader funktioniert ebenfalls nicht.
Ich kann mich entsinnen, dass der UberUploader Anfang 2007 noch halbwegs funktioniert hat.
Das war das letzte Mal, dass ich mich mit Fileuploads und dazugebastelten Progress-Bars beschäftigen musste.
Allerdings fand ich das Script noch unübersichtlicher als meine Lösung -- und die war
schon schlecht (haufenweise globale Variablen).
MffG
EisFuX