You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl@perl.apache.org by Nick Tonkin <ni...@tonkinresolutions.com> on 2003/02/20 21:00:35 UTC

[mp2] what is and why is it my log?

Hi,

In my logs when dumping a warn() I see this occasionally:

192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28, <GEN1> line 245.
192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.

Anyone know what <GEN1> is and why it appears every so often?

Thanks,

- nick

-- 

~~~~~~~~~~~~~~~~~~~~
Nick Tonkin   {|8^)>


Re: [mp2] what is and why is it my log?

Posted by Nick Tonkin <ni...@tonkinresolutions.com>.
On Fri, 21 Feb 2003, Stas Bekman wrote:

> Ged Haywood wrote:
> > On Thu, 20 Feb 2003, Nick Tonkin wrote:
> >
> >
> >>Hi,
> >>
> >>In my logs when dumping a warn() I see this occasionally:
> >>
> >>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
> >>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
> >>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
> >>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28, <GEN1> line 245.
> >>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
> >>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
> >>
> >>Anyone know what <GEN1> is
> >
> >
> > I think it comes from Symbol.pm.  It's a handle: the string "GEN" is
> > in the source, the digit is just picked by the package when it opens a
> > file/socket/whatever it's doing.
>
> Most likely.
>
> >>and why it appears every so often?
>
> Try adding
>
> use Carp;
> $SIG{__WARN__} = \&Carp::cluck;
>
> in your startup.pl, this may shed some light. what's the call at line 28 of
> Access.pm? May be some debug print was forgotten in the modperl source code.

No, the warn is mine. It just says:


    my $ip = $r->connection->remote_ip;
    warn $ip;

Here's the output with Carp::cluck -

XX.XXX.XXX.X at /home/wm/perl/WM/Auth/Access.pm line 28, <GEN5> line 245.
        WM::Auth::Access::handler('Apache::RequestRec=SCALAR(0x85c5914)') called at -e line 0
        eval {...} called at -e line 0
XX.XXX.XXX.X at /home/wm/perl/WM/Auth/Access.pm line 28.
        WM::Auth::Access::handler('Apache::RequestRec=SCALAR(0x85b4b24)') called at -e line 0
        eval {...} called at -e line 0

one with <GEN5> and one right after it with nothing (as are almost all of
them).

- nick

-- 

~~~~~~~~~~~~~~~~~~~~
Nick Tonkin   {|8^)>


Re: [mp2] what is and why is it my log?

Posted by Stas Bekman <st...@stason.org>.
Ged Haywood wrote:
> On Thu, 20 Feb 2003, Nick Tonkin wrote:
> 
> 
>>Hi,
>>
>>In my logs when dumping a warn() I see this occasionally:
>>
>>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
>>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
>>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
>>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28, <GEN1> line 245.
>>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
>>192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
>>
>>Anyone know what <GEN1> is
> 
> 
> I think it comes from Symbol.pm.  It's a handle: the string "GEN" is
> in the source, the digit is just picked by the package when it opens a
> file/socket/whatever it's doing.

Most likely.

>>and why it appears every so often?

Try adding

use Carp;
$SIG{__WARN__} = \&Carp::cluck;

in your startup.pl, this may shed some light. what's the call at line 28 of 
Access.pm? May be some debug print was forgotten in the modperl source code.

__________________________________________________________________
Stas Bekman            JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/     mod_perl Guide ---> http://perl.apache.org
mailto:stas@stason.org http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org   http://ticketmaster.com


Re: [mp2] what is and why is it my log?

Posted by Ged Haywood <ge...@www2.jubileegroup.co.uk>.
On Thu, 20 Feb 2003, Nick Tonkin wrote:

> 
> Hi,
> 
> In my logs when dumping a warn() I see this occasionally:
> 
> 192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
> 192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
> 192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
> 192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28, <GEN1> line 245.
> 192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
> 192.168.0.24 at /home/wm/perl/WM/Auth/Access.pm line 28.
> 
> Anyone know what <GEN1> is

I think it comes from Symbol.pm.  It's a handle: the string "GEN" is
in the source, the digit is just picked by the package when it opens a
file/socket/whatever it's doing.

> and why it appears every so often?

Nope. :(

73,
Ged.