Sentencia Perl last
Bucles en PerlLa sentencia Perl last se usa para salir del bloque de sentencias del bucle, terminando así el bucle. Las sentencias posteriores a la sentencia last no se ejecutan, y el bloque continue tampoco se ejecuta.
Sintaxis
El formato de sintaxis es el siguiente:
last [LABEL];
Diagrama de flujo
Ejemplo
#!/usr/bin/perl
$a = 10;
while( $a < 20 ){
if( $a == 15)
{
# Salir del bucle
$a = $a + 1;
last;
}
print "El valor de a es:$a\n";
$a = $a + 1;
}
Al ejecutar el programa anterior, el resultado es:
a 的值为: 10 a 的值为: 11 a 的值为: 12 a 的值为: 13 a 的值为: 14Otras extensiones