my @values = map { foo( $_) } keys %properties; #### my @values = map { my $key = $_; map { bar( $key, $_) } keys %{$properties{$_}} } keys %properties; #### my @values = map { my $key = $_; map { [ $key, $_, $properties{$key}{$_}{'value'} ] } keys %{$properties{$_}} } keys %properties; #### my @values = map { my $key = $_; map { [$key, $_, $properties{$key}{$_}{'value'}] } sort {$a <=> $b} keys %{$properties{$_}} } sort keys %properties;