本文通过一个Perl脚本示例展示了如何遍历数组并对数组中的每个元素进行平方运算。重点介绍了foreach循环中控制变量的使用及修改，指出这种修改将同步反映到原始数组中。
#! /usr/bin/perl -W
use strict;
my @array = (1 .. 9);
my $num;
foreach $num(@array) {
$num **= 2;
}
print "@array/n";
输出如下：
1 4 9 16 25 36 49 64 81
在这里很重要的一点在于，控制变量$num代表着＠array中的一个特定项目。如在一个foreach结构的主题内修改控制变量的值，会同时改变控制变量当前代表的那个＠array元素。
因此每次执行foreach内的代码时，＠array的当前值都会发生变化。
use strict;
my @array = (1 .. 9);
my $num;
foreach $num(@array) {
$num **= 2;
}
print "@array/n";
输出如下：
1 4 9 16 25 36 49 64 81
在这里很重要的一点在于，控制变量$num代表着＠array中的一个特定项目。如在一个foreach结构的主题内修改控制变量的值，会同时改变控制变量当前代表的那个＠array元素。
因此每次执行foreach内的代码时，＠array的当前值都会发生变化。
扫一扫
349
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
