如何在perl中使用列表哈希

发布时间：2020-12-15 23:27:50 所属栏目：大数据来源：网络整理

导读：对不起这个语法问题.我找不到解决办法. 我想在perl中有一个哈希数组,每个哈希都有字符串和数组. 我正在尝试编写以下代码： use strict;my @arr = ( { name = "aaa",values = ("a1","a2") },{ name = "bbb",values = ("b1","b2","b3") } );foreach $a (@arr)

对不起这个语法问题.我找不到解决办法.
我想在perl中有一个哈希数组,每个哈希都有字符串和数组.
我正在尝试编写以下代码：

use strict;
my @arr = (
       { name => "aaa",values => ("a1","a2") },{ name => "bbb",values => ("b1","b2","b3") }
      );


foreach $a (@arr) {
  my @cur_values = @{$a->{values}};
  print("values of $a->{name} = @cur_valuesn");
};

但这对我不起作用.我收到编译错误和警告(使用perl -w)

a.pl第2行的匿名哈希中奇数个元素.
在a.pl第9行使用“strict refs”时,不能使用字符串(“a1”)作为ARRAY引用.

解决方法

请尝试以下方法：

use strict;
my @arr = (
       { name => "aaa",values => ["a1","a2"] },values => ["b1","b3"] }
      );


foreach $a (@arr) {
  my @cur_values = @{$a->{values}};
  print("values of $a->{name}: ");
    foreach $b (@cur_values){
        print $b . ","
    }
    print "n";
};

在第3行和第4行定义数组时,您只需使用方括号.

（编辑：李大同）

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