Re: Net::Cmd 2.24: ?error in response()

hvcrypt.org wrote:
:Just noticed an unusual diagnostic in my server logs:
:  Use of uninitialized value in substr at
/opt/perl-5.8.1/lib/5.8.1/Net/Cmd.pm line 354.
:
:Net::Cmd->response() does (in brief):
:  while (1)
:    stuff that gets $str
:    ($code,$more) = $cmd->parse_response($str);
:    unless (defined $code) {
:      $cmd->ungetline($str);
:      last;
:    }
:    some more stuff
:  }
:  return substr($code, 0, 1);
:
:Shouldn't the C<last> in that unless block be rather
a C<return CMD_ERROR>?
:Else it will always try to C<return substr(undef, 0,
1)>, which doesn't look
:right.

I just noticed this old message (from 22nd July 2006) in my
pending folder.
I haven't seen a response, and bleadperl still looks exactly
as described
here.

Anybody able to venture an opinion on it?

Hugo