Seit Perl 5.010 gibt es perlfunc given ... perlfunc when, welche eingebaut und schneller sind. Mit dem SmartMatch-Operator ist's dann auch genauso flexibel wie das switch.
Siehe auch
http://perldoc.perl.org/perlsyn.html#Switch-Statem...
http://perldoc.perl.org/perlsyn.html#Experimental-...