Subject: | startform testing of QUERY_STRING |
This piece of code that is in CGI.pm startform()
if (length($ENV{QUERY_STRING})>0) {
$action .= "?".$self->escapeHTML($ENV{QUERY_STRING},1);
}
nags about "Use of uninitialized value in length at (eval 8) line 11."
if QUERY_STRING does not exist.
one possible change.
if (defined($ENV{QUERY_STRING}) && length($ENV{QUERY_STRING})>0) {
$action .= "?".$self->escapeHTML($ENV{QUERY_STRING},1);
}