open FH, $_ or die qq(can't open "$_" for reading\n); binmode FH, ':raw'; my @lines = ; close FH;