Is there a switch statement in perl?

Perl 6 has been under development for over six years, prompting some Perl users to suggest that Perl 6 may be vaporware. There is currently a slow, but largely complete, implementation written in Haskell called Pugs. Two alternate implementations exist, based on PGE and Perl 5, and Wall announced at a recent conference in Europe that one of these implementations would become a Perl 6 alpha release by late December 2006.