Switch::Plain
a simple switch statement for Perl
metacpan.org