perl数据结构输出 Data::Dumper(转)

Perl由于有了引用，使得我们可以在不同的数据结构之间灵活的嵌套数据结构。
比方说，Hash的value可以是标量，也可以嵌套list，甚至还可以继续嵌套hash。

这样使得我们写代码的确方便了不少，但有的时候我们希望对这些复杂的数据结构
有个直观的感受，也就是说能够用perl的语法吧数据结构以及实际值表示出来。这在开发阶段尤其
有用！

正好Perl的模块Data::Dumper可以帮助我们干这件事。

Data::Dumper有面向对象和直接使用函数两种调用方法，

这里介绍直接使用函数的方式，简单好用，应该能够满足绝大多数需求：

Dumper接收的参数为一个标量的列表或者一个引用的列表。
my $a = "good";
my $b = "bad";
my @my_array = ("hello", "world", "123", 4.5);
my %some_hash = ("foo", 35, "bar", 12.4, 2.5, "hello",
"wilma", 1.72e30, "betty", "bye\n");

##使用函数
print Dumper($a);
print Dumper(\@my_array);
print Dumper(\%some_hash);
print Dumper((\%some_hash, \@my_array));

运行效果：
roger@roger-desktop:~/sandbox$ perl dump.pl
$VAR1 = 'good';
$VAR1 = [
'hello',
'world',
'123',
'4.5'
];
$VAR1 = {
'betty' => 'bye
',
'bar' => '12.4',
'wilma' => '1.72e+30',
'foo' => 35,
'2.5' => 'hello'
};
$VAR1 = {
'betty' => 'bye
',
'bar' => '12.4',
'wilma' => '1.72e+30',
'foo' => 35,
'2.5' => 'hello'
};
$VAR2 = [
'hello',
'world',
'123',
'4.5'
];
程序的输出会按照引用在list中的位置自动命名VAR[n].