为嵌套在 hashrefs 中的某个键构建倒置映射的优雅方法

Question

我有以下hashrefs结构的hashref：

$hashref = {
    user1 => {
        key1 => "unique_value1",
        ...
        key99 => "value1_99"
    },
    ...
    user26 => {
        key1 => "unique_value2",
        ...
        key99 => "value1_99"
    },

    user99 => {
        key1 => "unique_value1",
        ...
        key99 => "value99_99"
    },
};

我想要什么：

$hashref = {
    "unique_value1" => ["user1","user99"],
    "unique_value2" => ["user26"]
};

我一直在 create 上构建倒置地图，但我越来越懒了。

我可以为此使用任何一种糖吗？

谢谢。

Answer 1

一种方式：

my $h; 
push (@{$h->{$hashref->{$_}{key1}}}, $_) for keys %$hashref;

Answer 2

my %users_by_uval;
for my $user_id (%$users) {
    push @{ $users_by_uval{ $users->{$user_id}{key1} } }, $user_id;
}