if语句的Perl简写

Bij*_*jan 1 perl if-statement

我在Perl中有以下代码:

next if ++$count == 1;
Run Code Online (Sandbox Code Playgroud)

这应该相当于

if (++$count == 1) {
    next;
}
Run Code Online (Sandbox Code Playgroud)

next;如果我添加更多条件,有没有办法运行?(即如果++ $ count等于1或大于其他值?

cms*_*cms 9

我觉得有点像

next if ++$count == 1 or $count > $other_value;

应该只是工作.它虽然很密集,依赖于增量的副作用和优先顺序

我很想添加括号并移除增量

$count++;
next if ($count == 1) or ($count > $other_value);
Run Code Online (Sandbox Code Playgroud)

  • 请注意,只要找到'true`值,就会使用`或',其他的将不会被评估,因为`或`中的任何真值都会将整个事物呈现为"true". (2认同)