在Perl中循环

Question

可能重复:
perl中的for循环

use warnings;

my @a = (1, 2, 3, 4, 5);

for $x (@a)
{
    print $x*=2;
    print "\n";
}

print "outside the loop \n";
print "@a";

键盘链接:http://codepad.org/D2Aa74nZ

任何操作都在$x改变原始数组的内容.被$x表现得像一个引用/指针,而不是像一个变量？

Answer 1

这是perlsyn中"Foreach循环"中记录的行为.循环变量别名为循环列表中的每个元素.它不像Perl引用,但它有点像指针,如果你认为每个 Perl变量实际上是一个将名称与一个数据相关联的指针,并且一个数据可以通过多个名称找到 - 例如$x和$a[0]-在同一时间.