Perl 逻辑运算符示例
Perl 语言支持以下逻辑运算符。 假设变量 $a 为真，变量 $b 为假 −
| 序号 | 运算符 & 描述 |
|---|---|
| 1 | and 称为逻辑与运算符。 如果两个操作数都为真，则条件为真。 示例 − ($a and $b) is false. |
| 2 | && 如果两个操作数中都存在 C 风格的逻辑 AND 运算符，则将其复制到结果中。 示例 − ($a && $b) is false. |
| 3 | or 称为逻辑或运算符。 如果两个操作数中的任何一个不为零，则条件为真。 示例 − ($a or $b) is true. |
| 4 | || 如果存在于其他操作数中，C 风格的逻辑或运算符会复制一点。 示例 − ($a || $b) is true. |
| 5 | not 称为逻辑非运算符。 用于反转其操作数的逻辑状态。 如果条件为真，则逻辑非运算符将为假。 示例 − not($a and $b) is true. |
示例
试试下面的例子来理解 Perl 中所有可用的逻辑运算符。 将以下 Perl 程序复制并粘贴到 test.pl 文件中并执行该程序。
#!/usr/local/bin/perl $a = true; $b = false; print "Value of \$a = $a and value of \$b = $b\n"; $c = ($a and $b); print "Value of \$a and \$b = $c\n"; $c = ($a && $b); print "Value of \$a && \$b = $c\n"; $c = ($a or $b); print "Value of \$a or \$b = $c\n"; $c = ($a || $b); print "Value of \$a || \$b = $c\n"; $a = 0; $c = not($a); print "Value of not(\$a)= $c\n";
当上面的代码被执行时，它会产生下面的结果 −
Value of $a = true and value of $b = false Value of $a and $b = false Value of $a && $b = false Value of $a or $b = true Value of $a || $b = true Value of not($a)= 1
