perl-modperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Jim Schueler <>
Subject Re: Registry and CGI::Carp
Date Fri, 27 Jan 2012 21:11:02 GMT
There's no question or anything resembling a request in your email.  So my 
response may waste a lot of time.

Is this your original post?

If so, I might be able to help.

Admittedly, I can't follow the thread.  The PerlMonds responder refers to 
a function set_progname().  But I can't figure out what that refers to.

However, in the third exchange, you referenced a problem I have some 
experience with:  Apache::Registry executes the BEGIN{} block once, and 
the END{} block repeatedly.  Fundamentally, the Perl specification expects 
them to be balanced, and I'm still amazed at this shortcoming.  I wrote a 
workaround that might get you over your hurdle.  Please check out 

I'm amazed that my solution wasn't generally adopted.  As you note, it 
seems like this would be a pretty common scenario.  Give it a try, and 
please let me know whether this solution gives you any traction.



On Fri, 27 Jan 2012, Brett Lee wrote:

> Hi Folks,
> Running several scripts under ModPerl::Registry that use CGI::Carp.  Am
> seeing problems with the logging.  The message that is logged is correct,
> however the name of the script that generated the event is not.
> Each script contains a line similar to:
> use CGI::Carp qw(name=my_script_X);
> When the scripts are precompiled in, the *same* script name is
> logged for each and every script.  When scripts are not precompiled the name
> is frequently correct, but it is not correct all of the time.
> A post earlier to Perl Monks came back with the suggestion to extend
> to support running under Registry.  As what I am trying to do
> seems like it would be a pretty common scenario, am thinking there may be
> another option.
> Thanks for considering this one.
> Brett
  • Unnamed multipart/mixed (inline, None, 0 bytes)
View raw message