sentencia while de Perl es una forma de bucle que se repite mientras la condición sigue siendo cierto . Instrucciones
1

Inicia el bucle while especificando la palabra clave mientras
2

Especifique la condición para continuar el bucle entre paréntesis a continuación de la palabra clave , mientras que : .
Mientras ($ ok)
3

Proporcione las sentencias que se ejecutan cada vez que a través del bucle dentro llaves :
while ($ ok)
{
: $ ok = OK () , se evalúa
}
4

Publicar un continue cláusula opcional después el cuerpo del bucle , para especificar sentencias que se ejecutarán después de que el cuerpo, pero antes de que el estado , mientras que < . br>