作者gecer (gecer)
看板Perl
标题[问题] hash of hash 问题
时间Thu Jun 2 21:42:31 2016
use strict;
use warnings;
use Data::Dumper;
my %Hash1=(key1=>"key1",key2=>"key2",key3=>"key3");
my %HoH2 = (
A=>%Hash1,
B=>{
captain => "pierce",
major => "burns",
corporal => "radar"}
);
print Dumper(\%Hash1) ,"\n",Dumper(\%HoH2);
小弟想在hash 内直接指定另一个hash(红字) 但是print 後结果如下
$VAR1 = {
'key1' => 'key1',
'key3' => 'key3',
'key2' => 'key2'
};
$VAR1 = {
'key2' => 'B',
'key3' => 'key2',
'HASH(0x2973ce8)' => undef,
'A' => 'key1',
'key1' => 'key3'
};
看样子 是小弟语法错误 请问要如何指定正确语法?
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 220.134.181.194
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Perl/M.1464874954.A.458.html
1F：推 CindyLinz: 把 A=>%Hash1 改成 A=>\%Hash1 06/03 00:40