[prev in list] [next in list] [prev in thread] [next in thread] 

List:       apache-modperl
Subject:    Re: CGI::Carp
From:       Arshavir Grigorian <ag () m-cam ! com>
Date:       2005-07-26 14:28:43
Message-ID: 42E6489B.30900 () m-cam ! com
[Download RAW message or body]

Arshavir Grigorian wrote:
> 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?

In case anyone is curious, it was a Perl bug (#36521) and has now been 
fixed.
[prev in list] [next in list] [prev in thread] [next in thread]