Select Code to Download

>C:\>perl -MNet::Telnet -w -e "$obj = Net::Telnet->new; $obj->open(Hos
+t => '127.0.0.1');"
Argument "" isn't numeric in numeric gt (>) at C:/Perl/site/lib/Net/Te
+lnet.pm line 2569.

sub _optimal_blksize {
    my ($blksize) = @_;
...
    8192;
} # end sub _optimal_blksize

sub _optimal_blksize {
    my ($blksize) = @_;
...
    8192;
} # end sub _optimal_blksize

2568d2567
<     $blksize ||= 0;