sysread( $fh, $buf, 16*1024, length($buf) );