-p STDIN 在 Perl 中是什么意思？

geckos 发表于 Dev

壁虎

我遇到了这个代码

 if (-p STDIN) {
        while (<STDIN>) { ... }
 }

条件-p STDIN是什么意思？还有其他的喜欢-p吗？

戴夫·克罗斯

这是一个文件测试操作符。这是perldoc的完整列表：

-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 (false if symlinks aren't supported by the file system).
-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 or UTF-8 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)

因此-p，请检查文件句柄（在本例中为STDIN）是否附加到命名管道。

本文收集自互联网，转载请注明来源。

如有侵权，请联系 [email protected] 删除。