if ($ENV{'REQUEST_METHOD'} eq 'POST') {
read(STDIN,$eingabe,$ENV{'CONTENT_LENGTH'});
}
else {
$eingabe = $ENV{'QUERY_STRING'};
}Wozu das?
Schmeiss dass Raus und dann müßte es gehen.Struppi.
Nein, leider nicht.
Auch wenn ich nur Folgendes einsetze lande ich nur wieder beim leeren Formular...
my $eingabe = undef;
read(STDIN,$eingabe,$ENV{'CONTENT_LENGTH'});