这段小小的代码已经成为我的一些脚本中的一个主要部分,但是我从其他人编写的另一个工作脚本中提取了语法,并将其调整为适合我的需要。我甚至不确定这里使用的语法是打开文件处理程序的最好还是最常用的方法。有人可以解释这个Perl代码片段吗?
的代码是:
$fh = \*STAT_FILE;
open ($fh,">>".$stat_file) or die "Can't open $stat_file: $!\n";
my $print_flag = (-z $stat_file);
我不完全了解第一线,也高于代码的最后一行。具体而言,分别为\*STAT_FILE
和-z
。
我知道,大部分情况下,第二行会打开一个文件来追加或退出并引发错误。但是,我不明白$!
在这一行中的用途是什么。
有人可以一行一行地向我解释这个Perl代码吗?另外,如果上述方法不是首选方法,那么是什么?
在此先感谢
如果你不使用$ print_flag任何地方,然后删除该行