perl 有很多的命令  其中有  -e   是判断文件和目录是否存在

代码如下：

#!/usr/bin/perl


$fileExist = -e "/var/log/messages";
if ( $fileExist ) {
    print "Yes"
}
else {
    print "No"
}

还有以下命令：（请自行测试）

以下为文件测试清单：
文件测试测试操作符提供的信息
-r文件或目录可读
-w文件或目录可写
-x文件或目录执行
-o文件或目录归用户所有
-R文件或目录对真正用户可读
-W文件或目录对真正用户可写
-X文件或目录对真正用户执行
-O文件或目录归真正用户所有
-e文件或目录存在
-z文件存在且大小为0
-s文件或目录存在且不为0(返回字节数)
-f文件为普通文件
-d文件为目录
-l文件为符号链接
-p文件为命名管道(FIFO)
-S文件为一个套口(socket)
-b文件为块特殊文件
-c文件为字符特殊文件
-t打开tty控制台的文件句柄
-u文件或目录是设置用户ID号
-g文件或目录是设置用户组ID号
-k文件或目录的sticky位置位
-T文件是文本文件
-B文件是二进制文件
-M以天为单位的存在时间
-A以天为单位访问时间
-C以天为单位同代码更改时间