Perl next 语句

Perl 循环Perl 循环

Perl next 语句用于停止执行从next语句的下一语句开始到循环体结束标识符之间的语句,转去执行continue语句块,然后再返回到循环体的起始处开始执行下一次循环。

 

1. 语法

语法格式如下所示:

next [ LABEL ];

其中 LABEL 是可选的,如果没有指定 LABEL,next 语句将返回到循环体的起始处开始执行下一次循环。

 

2. 范例

#!/usr/bin/perl
 
$a = 10;
while( $a < 20 ){
   if( $a == 15)
   {
       # 跳出迭代
       $a = $a + 1;
       next;
   }
   print "a 的值为: $a\n";
   $a = $a + 1;
}

执行以上程序,输出结果为:

a 的值为: 10
a 的值为: 11
a 的值为: 12
a 的值为: 13
a 的值为: 14
a 的值为: 16
a 的值为: 17
a 的值为: 18
a 的值为: 19

Perl 循环Perl 循环

Perl last 语句用于退出循环语句块,从而结束循环,last语句之后的语句不再执行,continue语句块也不再执行。1. 语法:语法格式如下所示:last [LABEL];