perl - 如何找出哈希中是否至少有一个键

Question

有这样一个hash:

$hash = { Apple => 'red', Lemon => 'yellow', Carrot => 'orange' }

你怎么知道散列中是否至少有一个键？

Answer 1

只需在标量上下文中使用哈希就足够了。

if (%hash) {         # Or %$hash in your case.
   say "Not empty";
} else {
   say "Empty";
}

---

%hash 与 keys(%hash)

• keys(%hash) 在标量上下文中:返回元素的数量。
• %hash in scalar context (≥5.26):返回元素的数量。
标量上下文 (<5.26) 中的
• %hash:返回哈希是否为空。

因此，无论版本如何，您始终可以在标量上下文中简单地使用 %hash 来检查哈希是否为空。 keys(%hash) 可用于实现相同的结果，但 bool 上下文中的 %hash(例如 if (%hash))具有自 5.12 以来比等效使用 keys(%hash) 更快。​​

因此，无论版本如何，您始终可以在标量上下文中简单地使用 keys(%hash) 来获取哈希中的元素数量。您还可以在较新版本的标量上下文中使用 %hash。