Perl 循环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 的值为: 10a 的值为: 11a 的值为: 12a 的值为: 13a 的值为: 14