perl - 引用上的键的参数类型必须是 unblessed hashref 或 arrayref

Question

    if((scalar keys ($this->{'libraries'}->{$y}->{'cellHash'})) == 0){

这是我得到“引用的键的参数类型必须是无福的 hashref 或 arrayref”错误的那一行。你能帮我解决这个问题吗？
出于显而易见的原因，我没有发布代码。

Answer 1

keys的新能力引用是被设计打破的。 Perl 的开发团队无法弄清楚它应该如何处理一些引用，所以它只适用于一些引用。因此，keys接受引用的能力记录为 experimental .无法解决此问题，此“功能”已在 5.24 中删除。您不应该使用它，因为当您升级 perl 时，您的代码将停止工作。 .
您已经遇到了 keys 的情况。给定引用时不起作用。改为提供散列或数组。在这种情况下，您可能想要

keys(%{ $this->{'libraries'}->{$y}->{'cellHash'} })

整个事情可以写成这样:

if (!keys(%{ $this->{libraries}{$y}{cellHash} })) { ... }