you posted some code that said:
if ($ENV{'REQUEST_METHOD') eq 'GET') {
@pairs = split (/&/,
$ENV{'QUERY_STRING'});
} elsif ($ENV{'REQUEST_METHOD'} eg
'POST') {
**********
did you mean:
if ($ENV{'REQUEST_METHOD') eq 'GET') {
@pairs = split (/&/,
$ENV{'QUERY_STRING'});
} elsif ($ENV{'REQUEST_METHOD'} eq
'POST') {
NOTE the "eq" (cue) became an "eg" (gee).
I'm still too new to perl to know what "eg" means, but if you are running a
conditional, don't you want to say "eq"?
You have "eq" in the first part of the "if" statement, but not the "elsif" part.