Subject: | UNIVERSAL::isa fatally breaks CGI.pm |
The next in a series, UNIVERSAL::isa makes CGI unusable.
use UNIVERSALL::isa;
use CGI;
my $q = CGI->new('');
Use of uninitialized value in numeric eq (==) at /usr/local/share/perl/5.8.4/UNIVERSAL/isa.pm line 46.
UNIVERSAL::isa('', 'CGI') called at /usr/local/share/perl/5.8.4/CGI.pm line 527
CGI::init('CGI=HASH(0x84e2cec)', '') called at /usr/local/share/perl/5.8.4/CGI.pm line 356
CGI::new('CGI', '') called at (eval 20)[/usr/share/perl/5.8/perl5db.pl:619] line 2
eval '($@, $!, $^E, $,, $/, $\\, $^W) = @saved;package main; $^D = $^D | $DB::db_stop;
CGI->new(\'\');
;' called at /usr/share/perl/5.8/perl5db.pl line 619
DB::eval called at /usr/share/perl/5.8/perl5db.pl line 3349
DB::DB called at -e line 1
Can't call method "isa" without a package or object reference at /usr/local/share/perl/5.8.4/UNIVERSAL/isa.pm line 56.
You _really_ _really_ need to do some comprehensive testing on this to verify that it actually behaves the way it is expected to. The mere act of of some tiny module loading UNIVERSAL::isa is causing global change and destruction.