【perl编程】for循环

for循环

在 perl 中,redo 用于立即重新开始当前的循环迭代,而不进行条件测试和循环控制变量的更新redo 通常用于在特定条件下重复某个循环迭代。下面是一些示例,展示了如何使用 redo

循环控制语句:

控制语句 描述
next语句 停止执行从next语句的下一语句开始到循环体结束标识符之间的语句,转去执行continue语句块,然后再返回到循环体的起始处开始执行下一次循环。
continue语句 continue 语句块通常在条件语句再次判断前执行。
redo语句 redo 语句直接转到循环体的第一行开始重复执行本次循环,redo语句之后的语句不再执行,continue语句块也不再执行
goto语句 Perl 有三种 goto 形式:got LABLE,goto EXPR,和 goto &NAME。

 

大幅度

my $count = 0;

while ($count < 10) {
    $count++;
    print "Count: $count\n";
    if ($count == 5) {
        print "Redo at count 5\n";
        redo;  # 重新开始当前迭代
    }
}

输出:

Count: 1
Count: 2
Count: 3
Count: 4
Count: 5
Redo at count 5
Count: 6
Count: 7
Count: 8
Count: 9
Count: 10

 

posted @ 2022-04-12 10:59  苏格拉底的落泪  阅读(19)  评论(0编辑  收藏  举报