Déclaration de rétablissement de Perl

le redoLa commande redémarre le bloc de boucle sans réévaluer le conditionnel. Vous pouvez fournir une LABEL avecredoinstruction où LABEL est l'étiquette d'une boucle. UNEredo L'instruction peut être utilisée dans une boucle imbriquée où elle sera applicable à la boucle la plus proche si aucun LABEL n'est spécifié.

S'il y en a continue bloc sur la boucle, alors il ne sera pas exécuté avant l'évaluation de la condition.

Syntaxe

La syntaxe d'un redo la déclaration est la suivante -

redo [LABEL]

Représentation schématique

Exemple

Le programme suivant montre l'utilisation de redo déclaration -

#/usr/local/bin/perl
   
$a = 0;
while($a < 10) {
   if( $a == 5 ) {
      $a = $a + 1;
      redo;
   }
   print "Value of a = $a\n";
} continue {
   $a = $a + 1;
}

Cela produirait le résultat suivant -

Value of a = 0
Value of a = 1
Value of a = 2
Value of a = 3
Value of a = 4
Value of a = 6
Value of a = 7
Value of a = 8
Value of a = 9