Bucle while en Perl

Perl 循环Bucles en Perl

La sentencia while ejecuta repetidamente una sentencia o grupo de sentencias mientras la condición dada sea verdadera (true). La condición se prueba antes de ejecutar el cuerpo del bucle.

Sintaxis

El formato de la sintaxis es el siguiente:

while(condition)
{
   statement(s);
}

Aquí, statement(s) puede ser una sentencia individual o un bloque de código compuesto por varias sentencias.

condition puede ser cualquier expresión. Cuando la condición es true, se ejecuta el bucle. Cuando la condición es false, el flujo del programa sale del bucle.

Diagrama de flujo

Perl 中的 while 循环

En el diagrama,whileEl punto clave del bucle es que puede no ejecutarse ni una sola vez. Cuando la condición es false, se omite el cuerpo del bucle y se ejecuta directamente la siguiente sentencia después del bucle while.

Ejemplo

#!/usr/bin/perl $a = 10; # Ejecutar bucle while while( $a < 20 ){ printf "El valor de a es:$a\n"; $a = $a + 1; }

En el programa, el cuerpo del bucle se ejecuta cuando la variable $a es menor que 20, y sale del bucle cuando la variable $a es mayor o igual a 20.

Al ejecutar el programa anterior, el resultado es:

a 的值为 : 10
a 的值为 : 11
a 的值为 : 12
a 的值为 : 13
a 的值为 : 14
a 的值为 : 15
a 的值为 : 16
a 的值为 : 17
a 的值为 : 18
a 的值为 : 19

Perl 循环Bucles en Perl

Otras extensiones