我试图弄清楚如何删除返回值{}的哈希条目.
我正在做这样的事情;
if (ref($snapshots{"ID\:$id"}) eq "{}") {
print "ID $id hash no snapshots\n";
}
它似乎不起作用.有任何想法吗？
解决方法
鉴于{},ref将为“HASH”而不是“{}”
if (ref $snapshots{"ID\:$id"} eq 'HASH' && !scalar keys %{$snapshots{"ID\:$id"}}) {
delete $snapshots{"ID\:$id"};
}