Perl风格：使用for和do{}进行更富有创意的switch

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

• 有时，美学很重要。:-)

      for ($^O) {
          *struct_flock =                do                           {
  
                                  /bsd/  &&  \&bsd_flock
                                         ||
                              /linux/    &&    \&linux_flock
                                         ||
                            /sunos/      &&      \&sunos_flock
                                         ||
                    die "unknown operating system $^O, bailing out";
          };
      }
  

前进至 模块的关爱与滋养
返回至 使用&&和||的for-based switch
返回至 索引

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