代码之家 › 专栏 › 技术社区 › raldi

如何控制Perl的Data::Dumper中的变量名?

data-dumper perl

raldi · 技术社区 · 16 年前

我有一个简单的Perl脚本:

#! /usr/bin/perl -w

use strict;
use Data::Dumper;

my %foo = ( 'abc' => 1 );

print Dumper(\%foo);

$VAR1 = {
          'abc' => 1
        };

我如何让它输出这个?

%foo = (
         'abc' => 1
       );

4 回复 | 直到 13 年前

ysth 16 年前

print Data::Dumper->Dump( [ \%foo ], [ qw(*foo) ] );

扩展语法需要两个arrayref:一个用于转储标量,另一个用于使用名称。如果名称以*作为前缀,并且相应的标量是arrayref或hashref,则会生成数组或哈希赋值。

Chas. Owens 16 年前

use Data::Dumper;

$Data::Dumper::Terse = 1;

print '%foo = '.(Dumper \%foo);

serenesat 10 年前

除了ysth的答案,您还可以使用Ovid的 Data::Dumper::Names

serenesat 10 年前

推荐文章

James Finnegan · DateTime对象只能与另一个DateTime对象进行比较

9 月前

con · Negative Lookaward在perl正则表达式中不起作用

10 月前

Carsten · 使用最近的搜索模式更改文本块

10 月前

Mario Palumbo · 是否有bash-perl快捷方式来计算每行中的匹配数?

11 月前

Rawley Fowler · 我可以在Perl中为警告生成堆栈跟踪吗?

1 年前

A.Ellett · 测试-t STDIN与-t<STDIN>

1 年前

nick · 向后交换文件名

1 年前

Sangyong Gwak · 如何更改Perl Kelp应用程序的app_url

1 年前

con · 如何跳转到foreach迭代的特定点?

1 年前

A.G.Progm.Enthusiast · 如何使用Perl中的拼接从数组中一次性删除随机元素?

1 年前