Perl continue 语句
Perl 中的 continue 语句用于停止执行从 continue 语句的下一语句开始到循环体结束标识符之间的语句，返回到循环体的起始处开始执行下一次循环
continue 语句可用在 while 和 foreach 循环中。
continue 语句语法格式
Perl 中 while 循环中 continue 语句语法格式如下所示：
while(condition) { statement(s); } continue { statement(s); }
foreach 循环中 continue 语句语法格式如下所示：
foreach $a (@listA) { statement(s); }continue { statement(s); }
范例 : while 循环中使用 continue 语句
#!/usr/bin/perl =pod file: mail.pl author: 简单教程(www.twle.cn) Copyright © 2015-2065 www.twle.cn. All rights reserved. =cut $step = 5; while( $step < 9 ) { print "step = $step\n"; }continue { $step += 1; }
运行以上范例，输出结果为:
$ perl main.pl step = 5 step = 6 step = 7 step = 8
范例 ： foreach 循环中使用 continue 语句：
#!/usr/bin/perl =pod file: mail.pl author: 简单教程(www.twle.cn) Copyright © 2015-2065 www.twle.cn. All rights reserved. =cut @list = (1, 3, 5, 7, 9); foreach $value (@list) { print "value = $value\n"; }continue{ last if $value == 7; }
运行以上范例，输出结果为:
$ perl main.pl value = 1 value = 3 value = 5 value = 7