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

Reply via email to