open FH, $filename or die "Can't open '$filename': $!";