perldoc perlsyn Switch statements

これでいいの?