我遇到这行代码:
if( -f <filename> ) { ... }
-f似乎测试文件名是否存在,但我不确定。 Google目前还没有帮助(Google很难为“-f”),也没有我的Perl图书。
任何人都可以咨询?
解决方法
见
perlfunc。
-X FILEHANDLE -X EXPR -X DIRHANDLE -X
其中-X是以下之一:
-r: File is readable by effective uid/gid. -w: File is writable by effective uid/gid. -x: File is executable by effective uid/gid. -o: File is owned by effective uid. -R: File is readable by real uid/gid. -W: File is writable by real uid/gid. -X: File is executable by real uid/gid. -O: File is owned by real uid. -e: File exists. -z: File has zero size (is empty). -s: File has nonzero size (returns size in bytes). -f: File is a plain file. -d: File is a directory. -l: File is a symbolic link. -p: File is a named pipe (FIFO),or Filehandle is a pipe. -S: File is a socket. -b: File is a block special file. -c: File is a character special file. -t: Filehandle is opened to a tty. -u: File has setuid bit set. -g: File has setgid bit set. -k: File has sticky bit set. -T: File is an ASCII text file (heuristic guess). -B: File is a "binary" file (opposite of -T). -M: Script start time minus file modification time,in days. -A: Same for access time. -C: Same for inode change time (Unix,may differ for other platforms)
原文地址:https://www.jb51.cc/Perl/173201.html
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。