for my $val ( map { values %$_ } values %hoh ){
   ...
}