Perl控制结构的用法

本篇内容主要讲解“Perl控制结构的用法”，感兴趣的朋友不妨来看看。本文介绍的方法操作简单快捷，实用性强。下面就让小编来带大家学习“Perl控制结构的用法”吧!

Perl控制结构

一、Perl控制结构之条件判断

if(){

}
elsif(){

}
...
else{

}

二、Perl控制结构之循环：

1、while循环
while(){

}

2、until循环
until(){

}

3、类C的for循环，如
for($count=1;$count<=5;$count++){
#statementsinsidetheloopgohere
}

下面是在for循环中使用逗号操作符的例子：
for($line=,$count=1;$count<=3;$line=,$count++){
print($line);
}
它等价于下列语句：

$line=;  $count=1;  while($count<=3){  print($line);  $line=;  $count++;  }

4、针对列表(数组)每个元素的循环：foreach，语法为：
foreachlocalvar(listexpr){
statement_block;
}
例：

foreach$word(@words){  if($wordeq"the"){  print("foundtheword'the'\n");  }  }

注：
(1)此处的循环变量localvar是个局部变量，如果在此之前它已有值，则循环后仍恢复该值。
(2)在循环中改变局部变量，相应的数组变量也会改变，如：

@list=(1,2,3,4,5);  foreach$temp(@list){  if($temp==2){  $temp=20;  }  } 
此时@list已变成了(1,20,3,4,5)。

5、Perl控制结构之do循环
do{
statement_block
}while_or_until(condexpr);
do循环至少执行一次循环。

6、循环控制

退出循环为last，与C中的break作用相同；执行下一个循环为next，与C中的continue作用相同；PERL特有的一个命令是redo，其含义是重复此次循环，即循环变量不变，回到循环起始点，但要注意，redo命令在do循环中不起作用。

7、传统的gotolabel;语句。

三、Perl控制结构之单行条件

语法为statementkeywordcondexpr。其中keyword可为if、unless、while或until，如：

print("Thisiszero.\n")if($var==0);  print("Thisiszero.\n")unless($var!=0);  print("Notzeroyet.\n")while($var-->0);  print("Notzeroyet.\n")until($var--==0); 
虽然条件判断写在后面，但却是先执行的。

到此，相信大家对“Perl控制结构的用法”有了更深的了解，不妨来实际操作一番吧！这里是亿速云网站，更多相关内容可以进入相关频道进行查询，关注我们，继续学习！