数组的perl哈希

发布时间：2020-12-16 06:06:48 所属栏目：大数据来源：网络整理

导读：我试图访问作为哈希的一部分的数组的元素. for my $idx ( 0 .. $#vss ) { push (@{$vsnhash-{$vss[$idx]}},$vsports[$idx]);}print Dumper(%$vsnhash);($VAR1 = { 'name2' = [ '8001','8002' ],'name1' = [ '8000' ] }; 我能够使用foreach循环访问密钥： fo

我试图访问作为哈希的一部分的数组的元素.

for my $idx ( 0 .. $#vss ) {
    push (@{$vsnhash->{$vss[$idx]}},$vsports[$idx]);
}
print Dumper(%$vsnhash);

($VAR1 = {
      'name2' => [
                   '8001','8002'
                 ],'name1' => [
                   '8000'
                 ]
    };

我能够使用foreach循环访问密钥：

foreach my $key ( keys %$vsnhash ) {
print "$keyn";
}

如何在哈希中访问端口号(‘8001′,’8002’)数组？
感谢您的帮助！

解决方法

while (my ($k,$v) = each %$vsnhash) {
    print "$k: @$vn";
}

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!