Select Code to Download

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;