Re^3: Is the number before, in or after the interval? using spaceship operator <=>

($_ > $r) - ($_ < $l)

Should already do (can't test on Android :)

update

tested! =)

  DB<41> sub tst { ($_ > $r) - ($_ < $l) }

  DB<42> $l=3;$r=6
 => 6

  DB<43> print tst(),"\t" for 0..9
 => ""
-1    -1    -1    0    0    0    0    1    1    1
[download]

Cheers Rolf

_{(addicted to the Perl Programming Language and ☆☆☆☆ :)}

Comment on Re^3: Is the number before, in or after the interval? using spaceship operator <=> Select or Download Code