in reply to Perl Number range lookup question
my $x = 40;
print int( ( $x % 50 ) / 10 );
This exactly was the first thing I wrote, but I decided I'd not do it that way because "tiers" are usually things that get changed sooner or later and I thought the OP code might just be a contrived example.
Fruit and Vegetables
Me, that's why I'm so cool
Logic (separated into Horror and Brilliance)
Results (252 votes). Check out past polls.