Perl风格：使用foreach()循环

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

• foreach循环的隐式别名和局部化可以构成一个强大的结构

      foreach $e (@a, @b) { $e *= 3.14159 }
  
      for (@lines) {
          chomp;
          s/fred/barney/g;
          tr[a-z][A-Z];
      }
  

• 请记住，您可以一次性复制并修改所有内容

      foreach $n (@square = @single) { $n **= 2 }
  

• 您还可以使用哈希切片来修改哈希值

      # trim whitespace in the scalar, the array,
      # and all the values in the hash
      foreach ($scalar, @array, @hash{keys %hash}) {
          s/^\s+//;
          s/\s+$//;
      }
  

转到避免字节处理
返回在简短代码中使用$$_
回到索引

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