perl - 将散列元素初始化为 0

Question

我通过这样做在 Perl 中声明一个散列:

my %hash = ();

我继续向散列中添加元素。有时，$hash{$x} 未定义，这意味着它可能是 null。所以当我尝试打印它时，我什么也得不到。如果未定义条目 $x，我希望看到 0。有人可以告诉我该怎么做吗？如何将散列元素初始化为 0？

Answer 1

您可以在遇到未定义的值时使用 defined-or operator 打印默认值，而不是尝试设置默认值。 , //(适用于 Perl 5.10 及更高版本)。

在这个例子中，当你打印你的散列元素时，你要么打印元素，要么如果它没有定义，0:

use 5.010;

say $hash{$x} // 0;