Perl redo语句无需评估控制语句即可重新启动当前循环。该块中的其他语句将不会执行。
redo语句的语法如下:
redo;
Perl redo语句示例
$a = 5;
while($a <
150){
if( $a == 40 ){
$a = $a + 10;
redo;
}
print "a = $a\n";
}continue{
$a = $a * 2;
}
输出
a = 5
a = 10
a = 20
a = 50
a = 100
【Perl redo语句】在上面的程序中, 循环在$ a达到40的 redo条件下重启。
推荐阅读
- Perl正则表达式
- Perl print()和say()
- Perl运算符
- Perl运算符类型
- Perl对象概念(面向对象编程)
- Perl next语句
- Perl多维数组
- Perl模块和命名空间
- Perl last语句