Perl bucle do ... while
A diferencia de los buclesfor y while,que están poniendo a prueba la condición del bucle del bucle. EnPerl, bucle do ... while es para comprobar su estado al final del bucle.
do ... while es similar al bucle while, pero no ... while garantizará la aplicación de al menos un ciclo.
gramática
La sintaxis es la siguiente:
do
{
statement(s);
}while( condition );
Tenga en cuenta que las expresiones condicionales aparecen al final del bucle, por lo que la declaración (s) de bucle se ejecutará al menos una vez antes de que la condición se comprueba.
Si la condición es verdadera, el flujo de control del programa retrocede por encima de hacer, y luego volver a ejecutar la sentencia (s) de bucle. Este proceso se repite hasta que la condición dada se convierte en falsa.
diagrama de flujo
Ejemplos
#!/usr/bin/perl
$a = 10;
# 执行 do...while 循环
do{
printf "a 的值为: $a\n";
$a = $a + 1;
}while( $a < 15 );
El programa anterior, la salida es:
a 的值为: 10 a 的值为: 11 a 的值为: 12 a 的值为: 13 a 的值为: 14