perl-modperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Arshavir Grigorian ...@m-cam.com>
Subject CGI::Carp
Date Fri, 22 Jul 2005 00:18:22 GMT
Hello list,

Not sure when this started happening, but at some point calling 
CGI::Carp::carp() started resulting in deep recursion within 
CGI::Carp::warn() eventually killing the process. I think the recursion 
is caused by the following:

$main::SIG{__WARN__}=\&CGI::Carp::warn;

sub realwarn { CORE::warn(@_); }

sub warn {
    ...
    return realwarn $message;
}

Is this a bug in the code or am I reading this wrong?




Arshavir

Mime
View raw message