Perl hacer ... while Loop

diferente a for y while bucles, que prueban la condición del bucle en la parte superior del bucle, el do...while loop comprueba su condición en la parte inferior del ciclo.

UN do...while El bucle es similar a un bucle while, excepto que se garantiza que un bucle do ... while se ejecutará al menos una vez.

Sintaxis

La sintaxis de un do...while bucle en Perl es -

do {
   statement(s);
}while( condition );

Cabe señalar que la expresión condicional aparece al final del ciclo, por lo que la declaración (es) en el ciclo se ejecuta una vez antes de que se pruebe la condición. Si la condición es verdadera, el flujo de control vuelve a funcionar y las declaraciones del ciclo se ejecutan nuevamente. Este proceso se repite hasta que la condición dada se vuelve falsa.

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

Ejemplo

#!/usr/local/bin/perl
 
$a = 10;

# do...while loop execution
do{
   printf "Value of a: $a\n";
   $a = $a + 1;
}while( $a < 20 );

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

Value of a: 10
Value of a: 11
Value of a: 12
Value of a: 13
Value of a: 14
Value of a: 15
Value of a: 16
Value of a: 17
Value of a: 18
Value of a: 19