Perl 等效于 (Postgresql BETWEEN 运算符？

Question

有这样的事吗？相当于a <= expr <= b ，或者用 SQL 的说法 expr BETWEEN a AND b , 其中expr只评估一次？或者只是要求这个 getting silly ？

Answer 1

在 Perl 中有多种方法可以做到这一点。

if( $a < $x and $x < $b ){ ... }
... if $a < $x and $x < $b;

use 5.10.1;
if( $x ~~ [$a..$b] ){ ... }

given( $x ){
  when( [$a..$b] ){ ... }
}

use 5.11.0; # development branch
given( $x ){
  ... when [$a..$b];
}