Skip Menu |
 

Preferred bug tracker

Please visit the preferred bug tracker to report your issue.

This queue is for tickets about the CGI CPAN distribution.

Report information
The Basics
Id: 12374
Status: resolved
Priority: 0/
Queue: CGI

People
Owner: Nobody in particular
Requestors: dwheeler [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: (no value)
Fixed in: (no value)



Subject: New Warnings in CGI 3.08
Download (untitled) / with headers
text/plain 1.4k
I got these warnings when starting up Apache with RT under mod_perl 1.29. Starting apache web server: Use of uninitialized value in numeric eq (==) at /usr/local/lib/perl5/5.8.5/CGI.pm line 182, <DATA> line 273. Use of uninitialized value in numeric eq (==) at /usr/local/lib/perl5/5.8.5/CGI/Cookie.pm line 26. Here's a patch to fix it (with much spanking to Geoff Young ;-)): diff -Naur CGI.pm-3.08.old/CGI/Cookie.pm CGI.pm-3.08/CGI/Cookie.pm --- CGI.pm-3.08.old/CGI/Cookie.pm Thu Apr 21 09:54:51 2005 +++ CGI.pm-3.08/CGI/Cookie.pm Thu Apr 21 09:55:57 2005 @@ -23,7 +23,7 @@ # Turn on special checking for Doug MacEachern's modperl my $MOD_PERL = 0; if (exists $ENV{MOD_PERL}) { - if ($ENV{MOD_PERL_API_VERSION} == 2) { + if (exists $ENV{MOD_PERL_API_VERSION} && $ENV{MOD_PERL_API_VERSION} == 2) { $MOD_PERL = 2; require Apache2::RequestUtil; require APR::Table; diff -Naur CGI.pm-3.08.old/CGI.pm CGI.pm-3.08/CGI.pm --- CGI.pm-3.08.old/CGI.pm Thu Apr 21 09:54:51 2005 +++ CGI.pm-3.08/CGI.pm Thu Apr 21 09:55:29 2005 @@ -179,7 +179,7 @@ if (exists $ENV{MOD_PERL}) { # mod_perl handlers may run system() on scripts using CGI.pm; # Make sure so we don't get fooled by inherited $ENV{MOD_PERL} - if ($ENV{MOD_PERL_API_VERSION} == 2) { + if (exists $ENV{MOD_PERL_API_VERSION} && $ENV{MOD_PERL_API_VERSION} == 2) { $MOD_PERL = 2; require Apache2::Response; require Apache2::RequestRec;


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.