Perl风格：通过创意使用do{}实现switch

1998年1月1日 by Tom Christiansen

• switch语句的另一种有趣方法是安排do块返回正确的值

     $amode = do {
         if     ($flag & O_RDONLY) { "r" }       # XXX: isn't this 0?
         elsif  ($flag & O_WRONLY) { ($flag & O_APPEND) ? "a" : "w" }
         elsif  ($flag & O_RDWR)   {
             if ($flag & O_CREAT)  { "w+" }
             else                  { ($flag & O_APPEND) ? "a+" : "r+" }
         }
     };
  

跳转到 通过 && 和 || 使用for实现switch
返回到 学习使用for进行switch
回到 索引

版权 © 1998, Tom Christiansen 版权所有。