Help for this page

Select Code to Download

Select or download this

use Carp qw( croak );

...
    sysread_full $sock, $read_length, 20;
    sysread_full $sock, $buffer, $read_length;
...