open my $fh,'<', $filename or die "can't open file: $!"; ... close $fh or die "can't close file: $!";