perl - 如何在perl中检查哈希是否为空

Question

我使用以下代码来检查哈希是否为空。有没有更好的方法并且使用安全吗？

if (!keys %hash) { print "Empty";} 

Answer 1

if (%hash)

效果很好。

来自perldoc perldata :

If you evaluate a hash in scalar context, it returns false if the hash is empty. If there are any key/value pairs, it returns true; more precisely, the value returned is a string consisting of the number of used buckets and the number of allocated buckets, separated by a slash.