Commander les structures dans le Perl

Le Perl est une langue de programmation itérative dans jusqu'à la laquelle la commande découle du premier rapport du programme dans le dernier rapport et à moins que quelque chose s'interrompt. Les choses qui peuvent interrompre l'écoulement linéaire s'appellent les branches et les structures conditionnelles de boucle. Le Perl offre à douzaine de telles constructions, qui ont été décrites ci-dessous.

Un bloc de rapport

Les blocs de rapport fournissent une manière pour grouper des rapports qui doit être exécuté en conséquence une certaine expression sont évalués. Ils sont employés dans les structures de commande qui sont discutées ci-dessous. Des blocs de rapport sont indiqués par une paire de croisillons bouclés.

Form: BLOCK

{
stmt_1;
stmt_2;
stmt_3;
}

Si rapport

Form: if (EXPR) BLOCK

if (expression) {
true_stmt_1;
true_stmt_2;
true_stmt_3;
}

rapport d'if/else

Form: if (EXPR) BLOCK else BLOCK

if (expression) {
true_stmt_1;
true_stmt_2;
true_stmt_3;
} else {
false_stmt_1;
false_stmt_2;
false_stmt_3;
}

rapport d'if/elseif/else

Form: if (EXPR) BLOCK elseif (EXPR) BLOCK . . . else BLOCK

if (expression_A) {
A_true_stmt_1;
A_true_stmt_2;
A_true_stmt_3;
} elseif (expression_B) {
B_true_stmt_1;
B_true_stmt_2;
B_true_stmt_3;
} else {
false_stmt_1;
false_stmt_2;
false_stmt_3;
}

le rapport de moment

L'ÉTIQUETTE pour ceci et les structures suivantes de commande est facultative. En plus de la description, elle également fournissent la fonction dans les rapports quasi-goto comme dernier, prochain, et refont le rapport. La pratique en matière conventionnelle de Perl réclame les étiquettes qui doivent être exprimées en majuscule pour éviter la confusion avec des mots clés ou des variables.

Form: LABEL: while (EXPR) BLOCK

ALABEL: while (expression) {
stmt_1;
stmt_2;
stmt_3;
}

Jusqu'au rapport

Form: LABEL: until (EXPR) BLOCK

ALABEL: until (expression) { # while not
stmt_1;
stmt_2;
stmt_3;
}

Pour le rapport

Form: LABEL: for (EXPR; EXPR; EXPR) BLOCK

ALABEL: for (initial exp; test exp; increment exp) { # e.g., ($i=1; $i<5; $i++)
stmt_1;
stmt_2;
stmt_3;
}

Le rapport de foreach

Form: LABEL: foreach VAR (EXPR) BLOCK

ALABEL: foreach $i (@aList) {
stmt_1;
stmt_2;
stmt_3;
}

Le dernier opérateur

Durer, après et refaire les opérateurs qui suivent, s'appliquent seulement aux structures de commande de boucle. Elles font sauter l'exécution du rapport de la position où elles se produisent dans une autre position, en ce qui concerne la structure de bloc de la structure entourante de commande. Par conséquent, elles fonctionnent comme formes limitées du rapport goto.
Le bout dans l'exemple au-dessous de la commande de causes à sauter d'où elle se produit au premier rapport qui suit le bloc enfermant.

ALABEL: while (expression) {
stmt_1;
stmt_2;
last;
stmt_3;
}
# last jumps to here

Si le dernier bidon se produit également dans les structures nichées de commande, le saut peut être fait à l'extrémité de la boucle externe en ajoutant simplement une étiquette à cette boucle et en indiquant l'étiquette dans le dernier rapport.

ALABEL: while (expression) {
stmt_1;
stmt_2;
BLABEL: while (expression) {
stmt_a;
stmt_b;
last ALABEL;
stmt_c;
}
stmt_3;
}
# last jumps to here

Le prochain opérateur

Le « prochain » est semblable aux derniers sauts d'opérateur sauf que d'exécution à l'extrémité du bloc, mais elle demeure toujours à l'intérieur du bloc, sortant plutôt le bloc. Par conséquent l'itération continue normalement. Comme avec le bout, après peut également être employé avec une étiquette pour sauter à une boucle externe.

ALABEL: while (expression) {
stmt_1;
stmt_2;
next;
stmt_3;
# next jumps to here
}

L'opérateur de refaire

« Refaire » l'opérateur est très semblable au prochain opérateur sauf qu'aux sauts d'exécution jusqu'au dessus du bloc sans réévaluation de l'expression de commande.
Comme avec le bout, après peut également être employé avec l'étiquette pour sauter à une boucle externe.

ALABEL: while (expression) {
# redo jumps to here
stmt_1;
stmt_2;
redo;
stmt_3;
}

Keywords:perl tutorial, perl scripts, perl programming, active perl, perl download, blackberry perl, perl regular expressions, perl split, perl array, perl script page

HTML Quizes

XML Quizes