De Perl while afirmación es una forma de bucle que itera el tiempo que una condición sigue siendo cierto.
Instrucciones
1 Iniciar el while de bucle especificando el while de palabras clave.
2 Especificar la condición para continuar el bucle entre paréntesis después del while de palabra clave:
while ($ok)
3 Proporcionar las sentencias que se ejecutan cada vez que a través del lazo entre llaves:
while ($ok)
{
: $ok = ok(); }
while ($ok)
{
: $ok = ok(); }
4 Marque con una opcional continue cláusula después de que el cuerpo del bucle, para especificar sentencias que se ejecutarán después de que el cuerpo, pero antes de que el while se evalúa la condición.