Bug#310417: libnet-perl: Net/Cmd.pm(354) uninitialized value -> Net/NNTP.pm(673) Argument "" isn't numeric.

[Niko Tyni]

Control: found -1 5.20.2-3

On Mon, Apr 21, 2008 at 01:50:48PM +0300, Niko Tyni wrote:
> On Sun, Aug 07, 2005 at 03:26:35AM +0200, Marc 'HE' Brockschmidt wrote:
> 
> > > Use of uninitialized value in substr at /usr/share/perl5/Net/Cmd.pm line 354.
> > > Argument "" isn't numeric in numeric eq (==) at /usr/share/perl5/Net/NNTP.pm
> > > line 673.
> > 
> > The Net::NNTP call is a simple quit cmd. It tries to get the respone
> > with Net::Cmd::respone(), which somehow has no return value. 
> > This could happen if the server sends back unparseable crap. 
> 
> Looking at the code in 5.10.0, based on CPAN libnet 1.22, this bug still
> seems to apply. Resetting the forwarded status for now; a CPAN ticket
> would be a good next step after confirming this with some test code.

Still happens. Easy to test with

% printf "200\n200\nfoo\n" | nc -l -p 6666
 
and then in another shell

% perl -w -MNet::NNTP -e 'die unless $n=Net::NNTP->new("localhost:6666"); $n->quit'
Use of uninitialized value in numeric eq (==) at /usr/share/perl/5.20/Net/NNTP.pm line 675.

-- 
Niko Tyni   ntyni at debian.org