Perl ‘且‘与‘或‘的奥秘：`&&`/`and`、`||`/`or`深度解析与实践232

您好！作为您的中文知识博主，今天我们来深入探讨Perl语言中一对既基础又充满“Perl味儿”的逻辑操作符——“且” (AND) 和 “或” (OR)。它们不仅仅是简单的真假判断，在Perl的世界里，它们还藏着优先级、短路求值以及代码风格的巧妙哲学。
---

各位程序猿、码农、代码爱好者们，大家好！欢迎来到我的Perl知识小课堂。今天，我们要聊聊Per尔语言中那些看似寻常却又内涵丰富的逻辑操作符——“且”（AND）和“或”（OR）。在Perl的世界里，你可能会遇到两套表达“且”和“或”的关键词：分别是符号形式的 `&&` 和 `||`，以及英文单词形式的 `and` 和 `or`。它们都能实现逻辑判断，但它们之间的细微差异，尤其是优先级上的不同，往往是Perl新手乃至老手都会“踩坑”的地方。理解这些差异，是写出地道、健壮Perl代码的关键。

逻辑操作符的共通性：短路求值（Short-circuit Evaluation）

无论是 `&&` 和 `and`，还是 `||` 和 `or`，它们都遵循“短路求值”的原则。这意味着什么呢？

对于“且” (AND) 操作符： `A && B` 或 `A and B`。如果表达式 `A` 已经被判定为假（false），那么整个表达式的结果就已经是假了，此时表达式 `B` 将不会被执行。
对于“或” (OR) 操作符： `A || B` 或 `A or B`。如果表达式 `A` 已经被判定为真（true），那么整个表达式的结果就已经是真了，此时表达式 `B` 也将不会被执行。

在Perl中，“真”通常是非零数字、非空字符串、非空列表等；“假”通常是数字0、空字符串 `""`、未定义值 `undef`、空列表 `()` 等。短路求值是一个非常重要的特性，它不仅能提高代码效率，更是Perl中许多常用编程模式的基础。

“且”的不同表达：`&&` 与 `and`

`&&` 和 `and` 都表示逻辑“且”的关系，但它们的操作符优先级不同。这是理解它们差异的重中之重！

`&&` (高优先级)： 它的优先级非常高，高于赋值操作符 `=`，也高于函数调用参数的绑定。
`and` (低优先级)： 它的优先级非常低，低于赋值操作符 `=`，也低于大多数其他操作符。

让我们通过一个例子来直观感受这种差异：

假设我们有两个函数 `do_task_A()` 和 `do_task_B()`，它们都会返回一个布尔值（或可以被解释为布尔值的值）。

sub do_task_A { print "执行 A"; return 1; } # 假设返回真
sub do_task_B { print "执行 B"; return 0; } # 假设返回假
# 使用 &&
my $result_high_precedence = do_task_A() && do_task_B();
print "result_high_precedence 的值为：$result_high_precedence"; # 输出：执行 A执行 Bresult_high_precedence 的值为：0 (或空字符串)

在这里，`&&` 的优先级高于 `=`。所以 `do_task_A() && do_task_B()` 会先被计算出一个布尔结果（`1 && 0` 得到 `0`），然后这个结果 `0` 才会被赋值给 `$result_high_precedence`。

# 使用 and
my $result_low_precedence = do_task_A() and do_task_B();
print "result_low_precedence 的值为：$result_low_precedence"; # 输出：执行 A执行 Bresult_low_precedence 的值为：1

看到了吗？这次 `$result_low_precedence` 的值是 `1`！这是因为 `and` 的优先级低于 `=`。Perl会这样解析：
1. `my $result_low_precedence = do_task_A()` 先被执行。`do_task_A()` 返回 `1`，这个 `1` 被赋值给 `$result_low_precedence`。
2. 接着，表达式 `($result_low_precedence)` (即 `1`) `and do_task_B()` 被计算。因为 `1` 为真，所以 `do_task_B()` 会被执行，并返回 `0`。
3. `($result_low_precedence) and do_task_B()` 的最终结果是 `0`，但这个结果并没有被赋值给任何变量（因为赋值操作已在前面完成）。
总结： 当你希望将整个逻辑表达式的布尔结果赋值给一个变量时，请使用 `&&`。如果你希望先完成赋值，然后将赋值结果作为左操作数进行后续的逻辑判断，则可能会考虑使用 `and`（但这通常不是惯用法）。
`and` 的常见用途： 作为语句的连接符，类似C语言中的 `if (...) { ... }` 块的单行版：

# if (condition) { do_something(); } 的简洁写法
condition() and do_something();

如果 `condition()` 返回真，`do_something()` 就会被执行。如果 `condition()` 返回假，`do_something()` 则不会被执行（短路求值）。

“或”的不同表达：`||` 与 `or`

与“且”操作符类似，`||` 和 `or` 也都表示逻辑“或”的关系，且同样遵循短路求值原则，它们的主要区别也在于操作符优先级。

`||` (高优先级)： 它的优先级非常高，高于赋值操作符 `=`，也高于函数调用参数的绑定。
`or` (低优先级)： 它的优先级非常低，低于赋值操作符 `=`，也低于大多数其他操作符。

同样，我们用例子来说明：

假设 `$user_input` 是用户可能输入的值，或者可能是 `undef`。

my $user_input = undef; # 假设用户未输入
# 使用 || 设置默认值 (经典用法)
my $name_high_precedence = $user_input || "Guest";
print "name_high_precedence 的值为：$name_high_precedence"; # 输出：name_high_precedence 的值为：Guest

在这里，`||` 的优先级高于 `=`。`$user_input || "Guest"` 会先被计算：`undef` 为假，所以 `"Guest"` 被选中作为整个表达式的结果，然后这个结果被赋值给 `$name_high_precedence`。这是Perl中设置默认值的常见且推荐的方式。

# 使用 or (小心！)
my $name_low_precedence = $user_input or "Guest";
print "name_low_precedence 的值为：$name_low_precedence"; # 输出：name_low_precedence 的值为：undef

这次 `$name_low_precedence` 的值是 `undef`！为什么呢？因为 `or` 的优先级低于 `=`。Perl会这样解析：
1. `my $name_low_precedence = $user_input` 先被执行。`$user_input` (即 `undef`) 被赋值给 `$name_low_precedence`。
2. 接着，表达式 `($name_low_precedence)` (即 `undef`) `or "Guest"` 被计算。因为 `undef` 为假，所以 `"Guest"` 被选中作为右操作数。
3. `($name_low_precedence) or "Guest"` 的最终结果是 `"Guest"`，但这个结果并没有被赋值给任何变量。
总结： 当你希望将逻辑表达式的第一个真值赋值给一个变量时，请使用 `||`。

`or` 的经典用途：`or die` 语句
这是Perl中最具标志性的用法之一，用于简洁地处理错误：

open my $fh, '

2026-03-05

---

下一篇：Perl排序性能瓶颈？揭秘Sort Key（Schwartzian Transform）的优化魔法