Datei-Upload + zusätzliche Formulardaten in einem Formular

[Thomas Möhring]

Kann es sein, dass du nicht CGI.pm dafür benutzt?

Ja, so ist es ... verwende

if($ENV{'REQUEST_METHOD'} eq 'GET')
 {
 $Daten = $ENV{'QUERY_STRING'}
 }
else
 {
 read(STDIN, $Daten, $ENV{'CONTENT_LENGTH'});
 }

@Formularfelder = split(/&/, $Daten);

my %F;
foreach $Feld (@Formularfelder)
 {
 ($name[$i], $value[$i]) = split(/=/, $Feld);
 $value[$i] =~ tr/+/ /;
 $value[$i] =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
 $value[$i] =~ s/<!--(.|\n)*-->//g;
 $value[$i] =~ s/'//g;
 $F{$name[$i]} = $value[$i];
 $i++;
 }

... und habe dann alle Daten in %F.