这个 Perl 布尔语法有什么问题？

Question

我需要在这些条件下使用黑客：

• 这是数据的最后一页。
• 这也不是第一页。
• 不存在页面大小为偶数的数据项。

所以我尝试了这段代码：

my $use_hack = 
   $last_page_number == $current_page_number and
   $page_number != 1 and
   $total_items % $items_per_page != 0;

我不断收到关于最后一个条件的警告 Useless use of numeric ne (!=) in void context ，并且当 $total_items % $items_per_page = 0 时评估为 true。

say 'NOT EVEN' if $total_items % $items_per_page != 0;  #works properly, though...

我尝试了各种括号组合来使其正确，但似乎没有任何效果。

Answer 1

好的，运算符优先级。 and 几乎是 Perl 中所有运算符中优先级最低的，因此 Perl 以一种奇怪的顺序计算表达式。切换到 && 相反，我得到了正确的结果。布拉格。

您了解的更多。

编辑：
正如 Philip Potter 在下面指出的，Perl 最佳实践（第 70 页）建议始终使用 &&,||, ! 来表示布尔条件 - 限制 和or 和 not 用于控制流，因为它们的优先级较低。 （它甚至说永远不要使用 and 和 not，仅使用 or 作为后备逻辑。）
谢谢大家！

Answer 2

将 RHS 括在括号中：

my $use_hack = (
   $last_page_number == $current_page_number and
   $page_number != 1 and
   $total_items % $items_per_page != 0);

与 and 运算符相比，赋值 (=) 具有更高的优先级。您可以查看Perl 运算符优先级。