Perl last 语句

http://www.runoob.com/perl/perl-last-statement.html

 

Perl last 语句用于退出循环语句块，从而结束循环，last语句之后的语句不再执行，continue语句块也不再执行。

语法

语法格式如下所示：

last [LABEL];

流程图

实例

#!/usr/bin/perl $a = 10; while( $a < 20 ){ if( $a == 15) { # 退出循环 $a = $a + 1; last; } print "a 的值为: $a\n"; $a = $a + 1; }

执行以上程序，输出结果为：

a 的值为: 10
a 的值为: 11
a 的值为: 12
a 的值为: 13
a 的值为: 14