perl - 我需要 "close FILEHANDLE"检查错误吗？

Question

"or die $!"-part in the "close $fh or die $!;"-line 行吗？

#!/usr/bin/env perl
use warnings;
use strict;

my $file = 'my_file';
open my $fh, '<', $file or die $!;

print <$fh>;

close $fh or die $!;

Answer 1

在您的示例中，由于它位于脚本的末尾并且位于打开以供阅读的文件中，因此它是不必要的。

我想在阅读管道时考虑是否有必要。通常你在 EOF 条件后关闭，所以我认为也没有必要。

但是，如果您正在编写，则可以在关闭时间检测到各种错误。最简单的例子是一个完整的磁盘。由于缓冲，这可能不会在关闭文件句柄之前报告。

您也可以 use autodie (我认为在致命上面推荐)。