perl - 我不想使用 Data::Dumper 的默认设置，我该怎么办？

Question

我发现自己一直在使用这种方法打印出 Perl 值:

sub d {
  Data::Dumper->new([])->Terse(1)->Indent(0)->Values([$_[0]])->Dump;
}

say "x = ", d($x), ' y = ', d($y);

我喜欢这样，因为我不想在我的输出中使用 $VAR1 =，而且我很少处理递归数据结构。

但是每次我调用 d() 时创建一个新的 Data::Dumper 对象并执行那条长链的初始化的想法困扰着我。

我可以使用另一个字符串化器吗？

Answer 1

选项 1，使用 Data::Dumper variables :

$Data::Dumper::Terse  = 1;
$Data::Dumper::Indent = 0;

say Dumper "x =", Dumper($x), " y = ", Dumper($y);