perl - 如何防止使用 `Data::Dumper`打印变量名

Question

我正在使用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,
}

Answer 1

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

$ perl -MData::Dumper -wle '$Data::Dumper::Terse = 1; print Dumper {-PARAMS => 1}'
{
  '-PARAMS' => 1
}