open my $fh , '<', $path; print $_ while ( sysread $fh, $_ , 8192 ); close $fh;