Perl foreach用法指南

本文和大家重点讨论一下Perl foreach命令的用法，Perl foreach循环中控制变量的值会被Perl自动保存和恢复。当循环进行时，是没有办法改变其值的。循环结束时，变量的值会回到循环开始前，如果没有值则为undef。

Perl foreach用法

Perl foreach从列表（数组）的第一个元素一直循环执行到最后一个元素，一次迭代一个。控制变量（本例中为$rock）每一次迭代从列表中取出一个新值。第一次为“bedrock”,第三次为“lava”。控制变量不是这些列表元素中的一个拷贝而是这些元素本身。也就是说，如果在循环中修改这个变量，那原始列表中的元素也会被修改，如下面代码段所显示。这条性质是有用的，但是，如果不清楚，可能对其结果感到吃惊。

当循环结束时$rock的值为多少呢？其值同循环开始之前相同。Perl foreach循环中控制变量的值会被Perl自动保存和恢复。当循环进行时，是没有办法改变其值的。循环结束时，变量的值会回到循环开始前，如果没有值则为undef。这意味着如果有一个变量和控制变量有相同的名字：“$rock”，不用担心会混淆它们。

Perl中while和Perl foreach的区别

while(defined($_=<STDIN>))  


{  


print“Isaw$_”;  


} 

在列表context中使用行输入操作时，则会将所有的行（剩下的）当作一个列表，而每一行作为列表的一个元素：

Perl foreach(<STDIN>)  


{  


print“Isaw$_”;  


}