Perl && 的结果是什么？

Question

当我尝试这个时：

$a = 1;
$b = 2;
print ($a && $b) . "\n";

结果是2。为什么？

Answer 1

引用 perlop：

“||”、“//”和“&&”运营商
返回最后评估的值
（与 C 的“||”和“&&”不同，
返回 0 或 1)。

Perl 认为生成的 2 为 true，因此当您在逻辑条件下使用 && 运算符时，一切都会按预期工作。额外的好处是，您也可以在其他上下文中使用逻辑运算符：

sub say_something {
    say shift || 'default';
}

say_something('foo'); # prints 'foo'
say_something(); # prints 'default'

甚至作为流程修饰符：

my $param = shift || die "Need param!";
-f $file && say "File exists.";

在最后两个示例中，很高兴认识到如果 && 它们无法工作和 || 运算符没有短路。如果您在第一行shift一个真值，则没有必要评估右侧（die…），因为整个表达式无论如何都是true。如果文件测试在第二行失败，则不需要再次评估右侧，因为总体结果是错误的。如果逻辑运算符无论如何都坚持评估整个表达式，我们就不能以这种方式使用它们。

Answer 2

这就是 && 运算符的工作原理：如果左侧参数的计算结果为 true，则表达式的值就是右侧参数的值。 perlop 页面对此进行了介绍。

然而，你也让自己暴露了一个更微妙的问题。您会发现换行符没有被打印。这是因为，如果您将表达式放在 print （或任何其他函数名称）后面的括号中，则传递给 print 的参数就是括号中的参数。要注意到这一点，请确保打开警告。将这些行放在每个程序的顶部：

#!/usr/bin/perl -w

use strict;

直到您足够理解它们并自行决定是否继续它们。 :-)

在你的情况下，你会得到这个：

print (...) interpreted as function at p line 7.
Useless use of concatenation (.) or string in void context at p line 7.

Answer 3

因为 && 运算符计算右操作数，并在左操作数计算结果为 true 时返回结果。