hi!
um Parameter sowohl aus POST- als auch aus GET-Operationen auslesen zu können, hilft folgende Routine: [...]
Ich will dich ja nicht kritisieren, aber man muss etwas ja nicht unbedingt unnötig kompliziert lösen! Außerdem war ein Fehler drin.
if ($ENV{'REQUEST_METOD'} eq "GET")
{
$q = $ENV{'QUERY_STRING'};
} else {
read(STDIN, $q, $ENV{'CONTENT_LENGTH'});
}
for (split(/&/, $q))
{
tr/+/ /;
s/%[a-fA-F0-9]{2})/pack("C", hex($1))/ge;
($key, $value) = split(/=/);
$data[$key} = $value;
}
bye, Frank!