open my $INFILE, '<', 'some_file' or die "Couldn't open $fname: $!";