你知道吗’$:: 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.
解决方法
$:: n与$main :: n相同或只是$n,其中$n驻留在main :: package中.
这种表示法忽略了$n的最终词汇(用我的定义),即.
perl -Mstrict -we 'our $n=3; my $n=1; print $::n'
输出是3