Perl hasta Loop
Un until La declaración de bucle en el lenguaje de programación Perl ejecuta repetidamente una declaración de destino siempre que una condición dada sea falsa.
Sintaxis
La sintaxis de un until bucle en el lenguaje de programación Perl es -
until(condition) {
statement(s);
}
aquí statement(s)puede ser una sola declaración o un bloque de declaraciones. losconditionpuede ser cualquier expresión. El bucle se repite hasta que la condición se cumple. Cuando la condición se cumple, el control del programa pasa a la línea que sigue inmediatamente al bucle.
El número 0, las cadenas '0' y "", la lista vacía () y undef son todos false en un contexto booleano y todos los demás valores son true. Negación de un valor verdadero por! o not devuelve un valor falso especial.
Diagrama de flujo
Aquí el punto clave del bucle hasta es que es posible que el bucle nunca se ejecute. Cuando se prueba la condición y el resultado es verdadero, se omitirá el cuerpo del bucle y se ejecutará la primera instrucción después del bucle hasta.
Ejemplo
#!/usr/local/bin/perl
$a = 5;
# until loop execution
until( $a > 10 ) {
printf "Value of a: $a\n";
$a = $a + 1;
}
Aquí estamos usando el operador de comparación> para comparar el valor de la variable $ a con 10. Entonces, hasta que el valor de $ a sea menor que 10, untilEl bucle continúa ejecutando un bloque de código junto a él y tan pronto como el valor de $ a sea mayor que 10, sale. Cuando se ejecuta, el código anterior produce el siguiente resultado:
Value of a: 5
Value of a: 6
Value of a: 7
Value of a: 8
Value of a: 9
Value of a: 10