Perl 中的 next 语句用于停止执行从next语句的下一语句开始到循环体结束标识符之间的语句,返回到循环体的起始处开始执行下一次循环
next 语句语法格式
Perl next 语句语法格式如下所示:
next [ LABEL ];
LABEL 是可选的,如果没有指定 LABEL,next 语句将返回到循环体的起始处开始执行下一次循环
范例 : Perl next 语句的简单使用
#!/usr/bin/perl
=pod
file: mail.pl
author: DDKK.COM 弟弟快看,程序员编程资料站(www.ddkk.com)
Copyright © 2015-2065 www.ddkk.com. All rights reserved.
=cut
$step = 11;
while( $step < 17 )
{
if( $step == 15)
{
# 跳出迭代
$step += 1;
next;
}
print "step 的值为: $step \n";
$step += 1;
}
运行以上范例,输出结果为:
$ perl main.pl
step 的值为: 11
step 的值为: 12
step 的值为: 13
step 的值为: 14
step 的值为: 16