Perl next语句

本文概述

• Perl下一条语句示例
• Perl标签下一条语句
• Perl标签为Example的下一条语句

Perl next语句类似于C中的continue语句。它可以帮助你继续进行数组的下一个元素或哈希操作, 以跳过它们之间的所有元素。

Perl next语句的语法如下：

next;

Perl下一条语句示例

@array = (a..z);
print("@array\n");
for ($index = 0; $index < @array; $index++) {
    if ($index == 0 || $index == 4 || $index == 8 || $index == 14 || $index == 20) {
        next;
    }
    $array[$index] = "-";
}
print("@array\n");

输出

a b c d e f g h i j k l m n o p q r s t u v w x y z
a - - - e - - - i - - - - - o - - - - - u - - - - -

在上面的程序中, 我们从(a-z)声明了一个数组。

字母数组按原样打印。

使用for循环, 对所有元音使用next语句。

我们已将(-)符号分配给除元音以外的其余数组元素。

现在, 由于下一条语句, 仅将打印元音元素, 而其他元素将替换为(-)符号。

Perl标签下一条语句

下一个标签允许你将控制权转移到除了相邻循环之外的其他封闭循环中。

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

Perl next语句的语法如下：

next LABEL;

Perl标签为Example的下一条语句

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

在上面的程序中, 下一个标签跳转到外循环并像下一个运算符一样执行for循环。