【perl】【next】介绍

参考：https://www.srcmini.com/28936.html； https://www.runoob.com/perl/perl-next-statement.html

语法
语法格式如下所示：

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

实例

#!/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

如果使用next语句指定了label, 则执行将跳至使用label标识的下一个迭代。

Perl next语句的语法如下：

OUTER: for ($i = 0; $i < 3; $i++) {
                for ($j = 0; $j < 3; $j++) {
                    print("inner: $i, $j\n");
                    if ($j == 1) {
                        next OUTER;
                    }
                }
                print("outer: $i, $j\n\n");
            }

输出为：
Inner: 0, 0
Inner: 0, 1
Inner: 1, 0
Inner: 1, 1
Inner: 2, 0
Inner: 2, 1