如何在Perl中指定多个布尔比较？

Question

它是while ($x > 3 || $y < 2)和其他编程语言一样吗？我几乎无法在网上找到告诉我如何在Perl中执行此操作的内容。

Answer 1

试试perldoc perlop。既有C风格的|| + &&可用，or + and也有不同的运营商优先级。

Answer 2

  

是否与其他编程语言一样（$ x＆gt; 3 || $ y＆lt; 2）？

是的，它是一样的。

让我们把它放在一个例子中。

#!/usr/bin/perl
use strict;
use warnings;
my $x = 10;
my $y = 0;
while ($x > 3 || $y < 2){
    print "X is $x, Y is $y\n";
    $x--;
    $y++;
}

输出：

X is 10, Y is 0
X is 9, Y is 1
X is 8, Y is 2
X is 7, Y is 3
X is 6, Y is 4
X is 5, Y is 5
X is 4, Y is 6

Demo

很简单，对吧？