9

Data::Dumper用来打印带有配置的 perl 哈希,它将由另一个脚本评估。问题是它总是$VAR =在输出开始时打印。我尝试将Varname参数设置为空字符串,但后来我得到$1$VAR. 如何防止使用打印变量名Dumper

my $params = {-PARAMS => 0} #data

local $Data::Dumper::Purity = 1;
local $Data::Dumper::Varname  = "";
print Dumper($params) ;

印刷:

$1 = {
    '-UPDATE' => 0,
}

我希望有:

{
    '-UPDATE' => 0,
}
4

2 回答 2

15

只需设置$Data::Dumper::Terse = 1;,它应该可以工作:

$ perl -MData::Dumper -wle '$Data::Dumper::Terse = 1; print Dumper {-PARAMS => 1}'
{
  '-PARAMS' => 1
}
于 2012-03-27T08:33:02.287 回答
6

或者使用 OO 语法:

print Data::Dumper->new([ {-PARAMS => 1 } ])->Terse(1)->Dump;
于 2012-03-27T09:12:02.563 回答