| Subject: | bug report |
| Date: | Wed, 17 Oct 2007 10:03:32 +0200 |
| To: | "bug-LWP-attic " [...] rt.cpan.org. |
| From: | Sörös József <soros.jozsef [...] multip.hu> |
Running the script bellow
#!/usr/bin/perl -w
use LWP::Socket;
$host=$ARGV[0];
$port=$ARGV[1];
$socket = new LWP::Socket;
if($socket) {
Show quoted text
> $socket->connect($host, $port);
> while(1) {
}
$socket->shutdown();
I have got this error message:
Name "main::DATA" used only once: possible typo at Ø/local/share/perl/5.8.8/LWP/Socket.pm line 364.
> > $socket->read_until("\n", \$buffer);
> > print $buffer;
> }