perl data::dumper 模块使用

Perl的Data:Dumper用来显示变量的数据结构，对于检查对象的有关数据时会很有用。

#!/usr/bin/perl

use Data::Dumper;
use strict;

my $my_scalar = "This is my scalar";
my @my_array = ("hello", "world", "123", 456);
my %my_hash = ( itmeA=> 12.4, itemB=> 1.72e30, itemC=>"bye/n");

print Dumper($my_scalar);
print Dumper(\@my_array);
print Dumper(\%my_hash);

# 上述语句可以在屏幕上打印出3个变量的数据结构，有点不爽的是，每个变量的名称并不打印出来，只是用简单的var1，var2来代替。

# 想要把变量名和变量值同时显示，要用dumper对象的方法改写以上代码。

my $dump_name = Data::Dumper->new([$my_scalar,\@my_array,\%some_hash],[qw(*my_scalar *my_array *my_hash)]);    
print $dump_name->Dump;