Perl 中的文件操作测试符

文件测试符可以用来测试一个文件的属性，其中主要有以下几种：


如果想判断一个文件是否为空，非常简单：

if(-z $filename)
{
    print "the file is null.\n";
}else
{
    print "the file is not null.\n";
}