Instruction redo Perl

Perl 循环Boucles Perl

L'instruction redo de Perl saute directement à la première ligne du corps de la boucle et commence à répéter cette itération. Les instructions après l'instruction redo ne sont plus exécutées, et le bloc de l'instruction continue n'est plus exécuté non plus.

L'instruction continue peut être utilisée dans les boucles while et foreach.

Syntaxe

Le format de la syntaxe est le suivant :

redo [LABEL]

Où LABEL est facultatif.

L'instruction redo avec le modificateur d'étiquette LABEL signifie transférer le flux de contrôle de la boucle directement vers la première ligne du bloc d'instructions associé au modificateur d'étiquette LABEL pour commencer l'exécution, et ne plus exécuter les instructions après l'instruction redo et le bloc d'instructions continue ;

L'instruction redo sans le modificateur d'étiquette LABEL signifie transférer le flux de contrôle de la boucle directement vers la première ligne du bloc d'instructions actuel pour commencer l'exécution, et ne plus exécuter les instructions après l'instruction redo et le bloc d'instructions continue ;

S'il se trouve dans une boucle for ou possède un bloc d'instructions continue, la liste d'incrémentation dans la boucle for et le bloc d'instructions continue ne sont plus exécutés ;

Organigramme

Exemple

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

En exécutant le programme ci-dessus, la sortie est :

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

Perl 循环Boucles Perl

Autres extensions