perl - 在 Perl 中，如何处理整个哈希？

Question

我想在 Perl 中处理哈希表的所有元素。我怎样才能做到这一点？

<小时/>

这是 official perlfaq 的问题。我们是importing the perlfaq to Stack Overflow .

Answer 1

(这是 official perlfaq answer ，减去任何后续编辑)

有几种方法可以处理整个哈希。您可以获得 keys 的列表，然后遍历每个键，或者一次获取一个键值对。

要浏览所有按键，请使用 keys function 。这会提取散列的所有键并将它们作为列表返回给您。然后，您可以通过正在处理的特定键获取值:

foreach my $key ( keys %hash ) {
    my $value = $hash{$key}
    ...
    }

获得键列表后，您可以在处理哈希元素之前处理该列表。例如，您可以对键进行排序，以便可以按词汇顺序处理它们:

foreach my $key ( sort keys %hash ) {
    my $value = $hash{$key}
    ...
    }

或者，您可能只想处理某些项目。如果您只想处理以 text: 开头的键，您可以使用 grep: 来选择那些键:

foreach my $key ( grep /^text:/, keys %hash ) {
    my $value = $hash{$key}
    ...
    }

如果散列非常大，您可能不想创建很长的键列表。为了节省一些内存，您可以使用 each() 一次获取一个键值对。 ，它返回一对你还没有见过的:

while( my( $key, $value ) = each( %hash ) ) {
    ...
    }

each 运算符以明显随机的顺序返回对，因此如果顺序对您很重要，则必须坚持使用keys方法。

each()不过，运算符可能有点棘手。在使用散列时，您无法添加或删除散列的键，而在 Perl 内部重新散列所有元素后，可能会跳过或重新处理某些对。此外，哈希只有一个迭代器，因此如果您使用 keys , values ，或each在同一个哈希上，您可以重置迭代器并扰乱您的处理。请参阅each entry在 perlfunc更多细节。