perl本身没有switch, 使用第三方模块 use Switch;

switch是比较被大家诟病的一个控制结构, 所以perl去掉了它.

关于switch的缺点参见<C专家编程>一书.