在标量上下文中评估 Perl 中的哈希值的原因是什么？

Question

我意识到在标量上下文中评估 Perl 中的数组很有用：它会产生#个元素。

但是能够在标量上下文中计算哈希值有什么实际用途呢？例如

• 我的 $scalar_value = %hash;

• 标量(%hash)

据我了解，它会生成一个类似“3/4”的字符串，提供有关哈希内部的一些信息，似乎只对调试有用。

Answer 1

它生成一个值，该值可用作 TRUE/FALSE 标志来了解哈希是否为空（无键）。

例如：

if (%hash) {
    print "Hash has elements\n";
} else {
    print "Hash is empty\n";
}

if 强制表达式进入标量上下文，因为它用作布尔表达式。

这与在标量上下文中使用 @array 来测试空性的概念非常相似：

if (@array) {
    # NOT empty!
}

Answer 2

标量(%hash) 可让您检查哈希算法是否正常工作。如果您有 1,000 个密钥，并且您看到类似 2/16 的内容，则意味着所有密钥仅解析为 16 个分配的存储桶中的 2 个。这意味着您的所有键都非常相似并导致大量冲突，从而导致存储桶中的长时间连续搜索。

默认存储桶计数为 8

perl -le '$h{a}=1;print scalar %h'
1/8

用 1000 个存储桶预存储哈希（到最接近的 2 的幂），

perl -le 'keys(%h) = 1000;$h{a}=1;print scalar %h'
1/1024

当您为 Perl OO 祝福哈希时，这也会有所帮助。
如果您知道会有很多密钥，则可以加快速度。