Don't recommend Switch please. The abstract in its documentation says (my emphasis):
A switch statement for Perl, do not use if you can use given/when
There are undoubtedly serious bugs lurking somewhere in code this funky :-) Bug reports and other feedback are most welcome.
May create syntax errors in other parts of code.
On perl 5.10.x may cause syntax error if "case" is present inside heredoc.
In general, use given/when instead. It were introduced in perl 5.10.0. Perl 5.10.0 was released in 2007.
The given and when keywords were introduced in Perl 5.10. They are experimental, and will warn on some versions of Perl (unless you disable that warning), but still a lot more reliable than Switch.
There's also Switch::Plain and Switcheroo on CPAN.