Sentencia next en Perl
Bucles en PerlLa sentencia next en Perl se utiliza para detener la ejecución de las sentencias desde la siguiente a la sentencia next hasta el identificador de fin del cuerpo del bucle, pasar a ejecutar el bloque de la sentencia continue y luego regresar al inicio del cuerpo del bucle para comenzar la siguiente iteración.
Sintaxis
El formato de la sintaxis es el siguiente:
next [ LABEL ];
Donde LABEL es opcional. Si no se especifica LABEL, la sentencia next regresará al inicio del cuerpo del bucle para comenzar la siguiente iteración.
Ejemplo
#!/usr/bin/perl
$a = 10;
while( $a < 20 ){
if( $a == 15)
{
# Saltar a la siguiente iteración
$a = $a + 1;
next;
}
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 的值为: 14 a 的值为: 16 a 的值为: 17 a 的值为: 18 a 的值为: 19Otras extensiones