Help for this page

Select Code to Download


  1. or download this
    ## Warning: Incomplete and untested ##
    
    ...
    while ($got_bytes < $total_bytes) {
        my $bytes = sysread $s, $buffer, $total_bytes - $got_bytes, $got_b
    +ytes;
    }