On Wed, Sep 07, 2005 at 03:47:24PM -0400, George Georgalis wrote:
>On Wed, Sep 07, 2005 at 03:24:50PM -0400, Matt Kettler wrote:
>>George Georgalis wrote:
>>
>>> grep -r REPORT /etc/spamassassin/ /usr/share/spamassassin/
>>> returned nothing that wasn't attached to other characters.
>>
>>Hmm.. what about greping /etc/resolv.conf?
>
>nothing.
>
>>Better yet, let's look at the code surrounding line 233 of INET.pm
>> head -n 235 /usr/share/perl/5.6.1/IO/Socket/INET.pm line |tail -n 5
>
> head -n 235 /usr/share/perl/5.6.1/IO/Socket/INET.pm |tail -n 5
>
>}
>
>sub sockport {
> @_ == 1 or croak 'usage: $sock->sockport()';
> my($sock) = @_;
>
>
>>That will at least help us narrow in on what parameter is text instead of
>>numeric, which might help us figure out what the problem is.
Well a grep Argument of my logs brings up some other entries,
2005-09-07 20:49:40.686200500 Argument "REPORT" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN3> line 117.
2005-09-07 20:49:40.703091500 Argument "REPORT" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN3> line 117.
2005-09-07 20:49:40.707188500 Argument "REPORT" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN3> line 117.
2005-09-07 20:49:40.724947500 Argument "REPORT" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN3> line 117.
2005-09-07 20:53:58.597992500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN3> line 80.
2005-09-07 20:53:58.602607500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN3> line 80.
2005-09-07 20:53:58.671268500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN3> line 80.
2005-09-07 20:53:59.208889500 Argument "ns1.nlnetlabs.nl." isn't numeric in
subroutine entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN3>
line 80.
2005-09-07 20:53:59.212616500 Argument "ns2.berdom.net." isn't numeric in
subroutine entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN3>
line 80.
2005-09-07 20:53:59.216305500 Argument "ns1.berdom.net." isn't numeric in
subroutine entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN3>
line 80.
2005-09-07 20:56:23.962210500 Argument "REPORT" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN18> line 58.
2005-09-07 20:56:23.978231500 Argument "REPORT" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN18> line 58.
2005-09-07 20:56:23.982179500 Argument "REPORT" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN18> line 58.
2005-09-07 20:56:23.999445500 Argument "REPORT" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN18> line 58.
2005-09-07 21:01:37.253175500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN18> line 203.
2005-09-07 21:01:37.253182500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN18> line 203.
2005-09-07 21:01:37.302893500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN18> line 203.
2005-09-07 21:01:38.623757500 Argument "ns2.info.nl." isn't numeric in
subroutine entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN18>
line 203.
2005-09-07 21:01:38.627453500 Argument "ns1.info.nl." isn't numeric in
subroutine entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN18>
line 203.
2005-09-07 21:03:44.712295500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN40> line 33.
2005-09-07 21:03:44.712306500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN40> line 33.
2005-09-07 21:03:44.728381500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN40> line 33.
2005-09-07 21:03:44.976395500 Argument "ns1.logingcramp.com." isn't numeric in
subroutine entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN40>
line 33.
2005-09-07 21:03:44.980485500 Argument "ns2.logingcramp.com." isn't numeric in
subroutine entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN40>
line 33.
2005-09-07 21:16:24.919024500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN33> line 34.
2005-09-07 21:16:24.923417500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN33> line 34.
2005-09-07 21:16:24.954193500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN33> line 34.
2005-09-07 21:16:25.142212500 Argument "ns1.hushdns.com." isn't numeric in
subroutine entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN33>
line 34.
2005-09-07 21:16:25.146072500 Argument "ns2.hushdns.com." isn't numeric in
subroutine entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN33>
line 34.
2005-09-07 21:21:32.709549500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN44> line 24.
2005-09-07 21:21:33.130575500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN64> line 20.
2005-09-07 21:21:33.327624500 Argument "CHECK" isn't numeric in subroutine
entry at /usr/share/perl/5.6.1/IO/Socket/INET.pm line 223, <GEN51> line 100.
I am able to resolve those domains to IPs.
This time I've managed to include the whole subroutine...
/usr/share/perl/5.6.1/IO/Socket/INET.pm
233 sub sockport {
234 @_ == 1 or croak 'usage: $sock->sockport()';
235 my($sock) = @_;
236 my $name = $sock->sockname;
237 $name ? (sockaddr_in($name))[0] : undef;
238 }
If I can provide any other info, let me know.
// George
--
George Georgalis, systems architect, administrator <IXOYE><
http://galis.org/ cell:646-331-2027 mailto:[EMAIL PROTECTED]
