Perl est un langage de programmation puissant qui permet au programmeur de prendre un degré élevé de contrôle sur le programme. Les étiquettes sont utilisées pour aider les programmeurs Perl organisent le programme. Une étiquette peut être appliqué à une boucle ou à un commutateur . Les boucles et les commutateurs imbriqués dans la boucle étiquetée peut alors rappeler à la structure plus large , sans ajouter une exception de terminaison à chaque commutateur et boucle le long du chemin . Ainsi , le programmeur peut sauter autour de la structure du code rapidement et simplement. Instructions
1
créer deux tableaux qui exigent le tri spécialisé. Ces tableaux seront prises pour un exemple :
@ animaux = ( "Chats noirs" , " chiens noirs », « Vaches laitières », « Wild Horses ','' Monkeys ») ;
< p > @ chance = ( 'Under Ladder »,« Black Cats »,« renversé Salt' , '13 ');
2
trier les noms avec des boucles imbriquées comme suit:
< p > @ animaux = ( "Chats noirs" , " chiens noirs », « Vaches laitières », « Wild Horses ','' Monkeys »);
@ chanceux = (' Under Ladder »,« chats noirs » , " renversé Salt ' , '13 ');
foreach $ créature ( @ animaux ) {
print" $ créature \\ n ";
if ($ créature = ~ /Black /) { foreach $
charme (@ chanceux) {
print "\\ t $ charme \\ n";
dernier if $ charme eq $ chanceux ; Photos
} }
}
ici, nous cherchons à travers le réseau des animaux de mauvaises porte-bonheur . La boucle de charmes de boucle se ferme lorsque "Chats noirs" sont rencontrés dans les deux boucles , mais la boucle d' animaux global continuera
3
insérer une étiquette à dissiper la confusion : .
@ animaux = ( "Chats noirs" , " chiens noirs », « Vaches laitières », « Wild Horses ','' Monkeys »);
@ chance = ( ' Under Ladder »,« Noir Cats »,« Renversé Salt ' , '13 ');
label: foreach $ créature ( @ animaux ) {
print "$ créature \\ n";
si ($ créature = ~ /Black /) { foreach $
charme (@ chanceux) {
print "\\ t $ charme \\ n";
dernière étiquette si $ charme eq $ chanceux ;
}
} }
N'importe quel nom peut être utilisé à la place de «label ». Elle doit être suivie par un colon quand il est d'abord déclaré. Il peut alors être appelé n'importe où dans la boucle ou qu'il contrôle. Au niveau des parties ultérieures du programme , il peut être appelé à «Label Start. "