my %counts=();
foreach $kid (%hoh) {
  foreach my $attribute (%$kid) {
    $counts{$attribute}{$kid->{attribute})++;
  }
}

...
print $counts{'age'}{12};