测试-t STDIN与-t<STDIN>

我正在编写一个可执行的perl脚本,我们称之为script,它从命令行执行的另一个命令中获取输出,并对该输出进行处理。

例如

$diff文件A文件B | SCRIPT

但是,如果我调用SCRIPT而不将其放在管道之后,我想发出错误信号。

以下MWE工作正常,但我不确定我是否理解原因。

#!/usr/bin/perl
use strict;
use warnings;

if ( -t STDIN )
  {
    print "NOTHING PIPED IN\n";
  }
else
  {
    while ( my $line = <STDIN> )
      {
        print ">> " . $line;
      }
  }

1;

我找不到关于什么的文件 -t 做。我的意思是,我可以发现它测试是否 文件句柄向tty打开 但我不确定那是什么意思。我也不明白为什么我必须使用 STDIN 没有角度操作器。

换言之,

if ( -t <STDIN> )

如果不在管道的接收端,则挂起,或者我丢失了管道数据的第一行。(我丢失了管道数据的第一行,这对我来说是有道理的。)

我原本期待着一些不同的东西。我原以为我应该按如下方式编写代码:

#!/usr/bin/perl
use strict;
use warnings;

if ( -t STDIN )
  {
    while ( my $line = <STDIN> )
      {
        print ">> " . $line;
      }
  }
else
  {
    print "NOTHING PIPED IN\n";
  }

1;

• 是什么 -t STDIN 实际上是用外行的术语进行测试。
• 为什么当没有任何东西被输入时,它会返回真值?
• 为什么当它是假的时候,我可以从 <STDIN> 在 while 循环?