open FH, '<', $file ...