I got this example code from the book "CGI Programming with Perl"
#!/usr/bin/perl -wT
use strict;
use CGI;
my $q = new CGI;
print $q->header( "text/plain" );
print "These are the HTTP environment variables I received:\n\n";
foreach ( $q->http ) {
print "$_:\n";
print " ", $q->http( $_ ), "\n";
}
Running this CGI script I get the expected output but I also get this
error in my Apache error.log file;
Use of uninitialized value in pattern match (m//) at (eval 11) line 3.
Use of uninitialized value in transliteration (tr///) at (eval 11) line 4.
I assume this is coming from CGI.pm. After commenting out the lines
one by one to figure out what is producing it I narrowed it down to
the "foreach" line. Could anybody tell me what is wrong and how to not
fix it?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
