Perl控制结构有哪些

这篇文章主要介绍Perl控制结构有哪些，文中介绍的非常详细，具有一定的参考价值，感兴趣的小伙伴们一定要看完！

for：for(初始化；循环条件；操作1){操作2；}

当不满足循环条件时，退出循环，例如：

for($i=0;$i<4;$i++){print “$i “;}

# 输出：0 1 2 3

foreach：历遍数组，例如：

foreach $i(0..3){print “$i “;}

# 输出：0 1 2 3

for也有同样的功能：

for $i(0..3){print “$i “;}

# 输出：0 1 2 3

while：while(条件){操作；}

 #直到条件不成立才退出循环

until：until(条件){操作；}

#直到条件成立才退出循环

my $i = 4;

while($i){print “$i “;$i--;};         #输出：4 3 2 1

print “\$i = $i\n”;               #输出：$i = 0

until($i>4){print “$i “;$i++;}     #输出：0 1 2 3 4

print “\$i = $i\n”;              #输出：$i = 5

while常用于历遍文件输入的内容：

open IN,”inflie” or die$!;

while(my $line=<IN>){

         print$line;

}

close IN;

next：进入下一轮循环

for $i(1..4){

         if($i% 2){next;}

         print“$i “;

}                                    #输出：2 4

last：退出循环

for $i(1..4){

         if($i>2){last;}

         print“$i “;

}                                    #输出：1 2

以上是“Perl控制结构有哪些”这篇文章的所有内容，感谢各位的阅读！希望分享的内容对大家有帮助，更多相关知识，欢迎关注亿速云行业资讯频道！