perl中的foreach结构
发布时间：2020-12-16 00:17:43 所属栏目：大数据 来源：网络整理
导读：perl中的foreach结构 ?首先语法 foreach $rock(qw /bedrock slate lava/){ ?????? $rock="t$rock"; ?????? $rock .="n"; } ?Foreach 从列表（数组）的第一个元素一直循环执行到最后一个元素，一次迭代一个。控制变量（本例中为$rock）每一次迭代从列表中取
|
perl中的foreach结构
?首先语法
foreach $rock(qw /bedrock slate lava/){
?????? $rock="t$rock";
?????? $rock .="n";
}
?Foreach 从列表（数组）的第一个元素一直循环执行到最后一个元素，一次迭代一个。控制变量（本例中为$rock）每一次迭代从列表中取出一个新值。第一次为 “ bedrock”,第三次为 “ lava” 。控制变量不是这些列表元素中的一个拷贝而是这些元素本身。 也就是说，如果在循环中修改这个变量，那原始列表中的元素也会被修改，如下面代码段所显示。这条性质是有用的，但是，如果不清楚，可能对其结果感到吃惊。
当循环结束时$rock 的值为多少呢？其值同循环开始之前相同。foreach 循环中控制变量的值会被 Perl 自动保存和恢复。当循环进行时，是没有办法改变其值的。循环结束时，变量的值会回到循环开始前，如果没有值则为 undef。这意味着如果有一个变量和控制变量有相同的名字：“ $rock” ，不用担心会混淆它们。
需要注意的问题：
1，其他语言的循环变量一般是循环元素的拷贝，改变循环变量的值不会改变原来元素的值。但perl不同，perl的循环变量是指向循环元素的物理地址的，所以对循环变量进行更改，就是对原来的循环元素进行了更改。
2，当循环结束时，$rock（循环变量）的值恢复为循环开始前的值，这是另外一个跟其他语言的不同的地方。
#! /usr/bin/perl -W
use strict; my @array = (1 .. 9); my $num; foreach $num(@array)
?{
??$num **= 2;}print "@arrayn";输出如下：1 4 9 16 25 36 49 64 81在这里很重要的一点在于，控制变量$num代表着＠array中的一个特定项目。如在一个foreach结构的主体内修改控制变量的值，会同时改变控制变量当前代表的那个＠array元素。因此每次执行foreach内的代码时，＠array的当前值都会发生变化
（编辑：李大同） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |