Help for this page
foreach my $a (keys %hash) { foreach my $b (keys %{$hash{$a}}) { print "$hash{$a}{$b}\n"; } }