迭代perl中的哈希值

Question

我有一个哈希,让我们说20个值.

它以这种方式初始化:

my $line = $_[0]->[0];

    foreach my $value ($line) {
        print $value;
    }

现在,当我尝试获取$ line中每个哈希的值时,它表示:在file.pl第89行打印时使用未初始化的值

有没有办法迭代哈希的每个值？

我也尝试过:

my %line = $_[0]->[0];

    foreach my $key (keys %line) {
        print %line->{$key};
    }

但这也行不通:参考文献找到了第89行的file.pl所需的偶数大小列表

谁知道该怎么办？应该不那么难......

Answer 1

迭代哈希中的值:

for my $value (values %hash) {
  print $value;
}