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