在 perl 中访问哈希元素的问题

Pau*_* IT 2 perl

我有以下哈希:

my %releaseMap = {"rel1.2.3" => {
                                    "supporedPorts" => ["lnx86", "lnppc"],
                                    "branch"        => ["DEV"],
                                },

                  "rel2.4" =>   {
                                    "supporedPorts" => ["lnx86", "lnppc"],
                                    "branch"        => ["DEV"],
                                }
                 };
Run Code Online (Sandbox Code Playgroud)

我想在变量 $rel 中获取值 rel1.2.3 和 rel2.4,我想在 $port 中获取值 lnx86 和 lnppc,我想在 $branch 中获取值 DEV。

我是 perl 中哈希概念的新手,我无法弄清楚如何做到这一点。

有人可以帮忙吗。谢谢

ike*_*ami 5

假设你真的有

my %releaseMap = ("rel1.2.3" => {
                                    "supporedPorts" => ["lnx86", "lnppc"],
                                    "branch"        => ["DEV"],
                                },

                  "rel2.4" =>   {
                                    "supporedPorts" => ["lnx86", "lnppc"],
                                    "branch"        => ["DEV"],
                                }
                 );
Run Code Online (Sandbox Code Playgroud)

您可以使用

for my $rel_id (keys(%releaseMap)) {
   my $rel = $releaseMap{$rel_id};

   my $ports    = $rel->{supporedPorts};
   my $branches = $rel->{branch};

   say "[$rel_id] ports = @$ports; branches = @$branches";
}
Run Code Online (Sandbox Code Playgroud)

文档: