Deeper level of hashing

I am using (roughly) the following code. my %counter = () ; $counter{label11}{parent} = 'label1' ; $counter{label11}{hits} = 14 ; $counter{label12}{parent} = 'label1' ; $counter{label12}{hits} = 14 ; If I use: for my $key(keys %counter), I get label11 and label12 as values. I would like to run something like: foreach my $key(keys %