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和*BAREWORDPerl有什么区别？

Answer 1

裸字的含义各不相同.大多数情况下,裸字是函数调用.

sub foo { say "Hello"; }
foo;

有时,它是一个字符串文字.

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

在其他情况下,它会产生一个类型的颜色.

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, ...)