'$ :: 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定义），即。

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

输出为3