if( sysread( OUT, my $buffer, 2048 ) > 0 ){ print $buffer }