perl - '$::n' 对 perl 意味着什么？

Question

你知道什么是“$::n;”方法 ？代码部分如下所示。

use JSON::XS;
# ...
open (YI, "| $cmd");
my $msg = { test => test };
my $emsg = encode_json($msg);
print YI "$msg_inject\n" unless $::n;
close YI;`

我记得我之前也遇到过 $::v。什么是 $::v ？它有额外的用途吗？

我只知道 $: 是 perl 语句的保留字，在一个字段中填充更多行。

此致，

TWLMD。

Answer 1

$::n与 $main::n 相同或只是 $n $n 所在的位置 main::包裹。

这种表示法会忽略 my 的最终词法(用 $n 定义)定义， IE。

perl -Mstrict -we 'our $n=3; my $n=1; print $::n'

输出为 3