L' instruction while de Perl est une forme de boucle qui parcourt aussi longtemps que la condition reste vraie. Instructions
1

Initier la boucle while en spécifiant le mot clé de tout
2

spécifier la condition pour la poursuite de la boucle entre parenthèses après le mot-clé de tout : .
Tout ($ ok )
3

Fournir les instructions à exécuter à chaque fois dans la boucle entre accolades :
while ($ ok ) {

: $ ok = ok (); }

4

Passer une clause de continuation facultative après le corps de la boucle , de préciser instructions à exécuter après le corps, mais avant que la condition de tout est évalué < . br>