Re: using keys on hash of hash


laziness, impatience, and hubris
	PerlMonks

Re: using keys on hash of hash

by pjf (Curate)

on May 22, 2008 at 02:08 UTC ( [id://687867]=note: print w/replies, xml )

Need Help??

in reply to using keys on hash of hash

%{ expr } is your friend:

my $v = {
        h1 => {
                k1 => 1,
                k2 => 2,
        },
        h2 => {
                k1 => 3,
                k2 => 4,
        },
};

my $interest = 'h1';

foreach my $key ( keys %{ $v->{$interest} } ) {
        print "$key has value $v->{$interest}{$key}\n";
}
__END__
k2 has value 2
k1 has value 1
[download]

Paul Fenwick
Perl Training Australia