perl中的Bad 文件句柄

xiaoliu

Perl 自身不能打开文件。和许多其它语言类似，Perl 请求操作系统来打开文件。当然，操作系统可能拒绝打开，如权限问
题，不正确的文件名等等。
如果从一个bad 文件句柄读入（文件句柄没有恰当的打开），会立刻到达文件结尾(end-of-file)。（具体的I/O 方法在本章后
面有介绍，end-of-file 在标量context 中由undef 标明，在列表context 中由空列表(empty list)标明）。如果写到一个bad 文件
句柄，数据会被悄悄地丢掉。
幸运的是，上述可怕的结果可以被避免。首先，可以使用–w 或者use warnings，Perl 通常能告诉我们如果使用了一个bad
文件句柄。如果不使用它，open 也能通过返回的是真是假来告诉我们（成功打开为真，打开失败返回假）。你可以如下的
写代码：
my $success = open LOG, “>>logifle”; #将返回值保存在$success 中
if(!$success){
#打开失败时
．．．
}