my $x = 40; print int( ( $x % 50 ) / 10 ); [download]
In reply to Re: Perl Number range lookup question by jwkrahn in thread Perl Number range lookup question by jamesbutler