perl - 如何将 boolean 条件结果分配给 perl 中的标量变量？

Question

我正在执行以下操作，但它无法正常工作:

    my $enabled = $hash && 
                  $hash->{'key'} && 
                  $hash->{'key'}->{'enabled'} && 
                  $hash->{'key'}->{'active'};

这是将 boolean 值分配给标量变量的一种可接受的方式吗？我的代码确实以奇怪的方式表现不正常，我相信这是因为这个分配。我已验证所有这些键都存在单独的值并设置为一个值。

附言对不起，我是个菜鸟!我在谷歌上搜索了大约 10 分钟，但在任何地方都找不到答案。

Answer 1

&&、||、and、or 等 Perl boolean 运算符不返回 boolean 值值，他们返回他们的参数之一的值:

say 2 && 3;

输出3。

您可以使用双重否定技巧将其强制为 boolean 值:

say !!(2 && 3);
# or
say not not 2 && 3;

输出1。