如何分析多维散列变量在Perl

Question

我有以下多方面的散列变量

my %billingMember ; 
$billingMember{1}->{'useremail_quota'} = 10; 
$billingMember{1}->{'useremail_blockedquota'} = 5; 

$billingMember{2}->{'useremail_quota'} = 10; 
$billingMember{2}->{'useremail_blockedquota'} = 5; 

我怎样才能解析变量％billingMember？

即我需要得到像

$ billingMember {1}的每个值 - > { 'useremail_quota'}，

$ billingMember {1} - > { 'useremail_blockedquota'}，

$ billingMember {2} - > { 'useremail_quota'} ....

这里1 & 2只是举例，它会动态

因此，我认为，我们需要使用的foreach或为

Answer 1

从http://perldoc.perl.org/perldsc.html#HASHES-OF-HASHES采取了一些样本：

foreach $family (keys %HoH) { 
    print "$family: { "; 
    for $role (keys %{ $HoH{$family} }) { 
     print "$role=$HoH{$family}{$role} "; 
    } 
    print "}\n"; 
} 

（编辑：只保留了其中一个可能会在你的情况下很有用）