Última función de Perl

Descripción

Ésta no es una función. La última palabra clave es una declaración de control de bucle que inmediatamente hace que la iteración actual de un bucle se convierta en la última. No se ejecutan más declaraciones y el ciclo finaliza. Si se especifica LABEL, se sale del bucle identificado por LABEL en lugar del bucle que lo encierra actualmente.

Sintaxis

A continuación se muestra la sintaxis simple para esta función:

last LABEL

last

Valor devuelto

Esto no devuelve ningún valor.

Ejemplo

A continuación se muestra el código de ejemplo que muestra su uso básico:

#!/usr/bin/perl

$count = 0;

while( 1 ) {
   $count = $count + 1;
   if( $count > 4 ) {
      print "Going to exist out of the loop\n";
      last;
   } else {
      print "Count is $count\n";
   }
}
print "Out of the loop\n";

Cuando se ejecuta el código anterior, produce el siguiente resultado:

Count is 1
Count is 2
Count is 3
Count is 4
Going to exist out of the loop
Out of the loop