http://www.perlmonks.org?node_id=658276


in reply to Re^3: Perl 5.10: switch statement demo
in thread Perl 5.10: switch statement demo

That's backwards. $foo % 3 checks if $foo *isn't* divisible by 3. not $foo % 3 would deceptively check if is divisible by 3.