在Perl中，BAREWORD和*BAREWORD有什么区别？

Question

my $childpid = open3(HIS_IN, HIS_OUT, HIS_ERR, $cmd, @args);

my $childpid = open3(*HIS_IN, *HIS_OUT, *HIS_ERR, $cmd, @args);

以上两种方法似乎都适用于我的应用程序。

Perl语言中的BAREWORD和*BAREWORD有什么不同？

Answer 1

光字的意思是不同的。在大多数情况下，赤字是一个函数调用。

sub foo { say "Hello"; }
foo;

有时，它是一个字符串文字。

$x{foo}    # $x{"foo"}

在其他情况下，它会生成一个typeglob。

print STDOUT "foo";   # print { *STDOUT } "foo";

在这种情况下，

open3(HIS_IN, HIS_OUT, HIS_ERR, ...)

等同于

open3("HIS_IN", "HIS_OUT", "HIS_ERR", ...)

但是open3使用该字符串作为调用者的包中glob的名称，因此上面的代码在功能上等同于

open3(*HIS_IN, *IS_OUT, *HIS_ERR, ...)