my @values = map {
    my $key = $_;
    map {
        bar( $key, $_)
    } keys %{$properties{$_}}
} keys %properties;