open my $fh => $file or pdie open => $file;