Perl风格：学习使用for循环进行切换

1998年1月1日，作者：Tom Christiansen

• 尽管Perl没有内置的switch语句，但这不是困难，而是一个机会。

• 构建它很容易。单词`for`有时发音为`switch`。

     SWITCH: for ($where) {
                 /In Card Names/     && do { push @flags, '-e'; last; };
                 /Anywhere/          && do { push @flags, '-h'; last; };
                 /In Rulings/        && do {                    last; };
                 die "unknown value for form variable where: `$where'";
             }
  

• 就像一系列的elsif，switch应该始终有一个默认情况，即使默认情况`不可能发生`。

跳转到创意使用do{}进行切换
返回到闭包
返回到索引

版权所有 © 1998, Tom Christiansen。保留所有权利。