Controlar estruturas no Perl

O Perl é uma língua de programação iterativa em que o controle flui da primeira indicação do programa à última indicação até e a menos que algo interromper. As coisas que podem interromper o fluxo linear são chamadas filiais e estruturas condicionais do laço. O Perl oferece a dúzia tais construções, que foram descritas abaixo.

Um Block da indicação

Os blocos da indicação fornecem uma maneira agrupando indicações que necessita ser executado em conseqüência alguma expressão está sendo avaliado. São usados nas estruturas do controle que são discutidas abaixo. Os blocos da indicação são designados por um par de cintas curly.

Form: BLOCK

{
stmt_1;
stmt_2;
stmt_3;
}

The if indicação

Form: if (EXPR) BLOCK

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

if/else indicação

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;
}

if/elseif/else indicação

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;
}

the While indicação

A ETIQUETA para esta e as seguintes estruturas do controle é opcional. Além à descrição, também fornece a função nas indicações quasi-goto como último, seguinte, e redo a indicação. A prática convencional do Perl chama-se para as etiquetas que devem ser expressadas em caixa para evitar a confusão com palavras chaves ou variáveis.

Form: LABEL: while (EXPR) BLOCK

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

The until indicação

Form: LABEL: until (EXPR) BLOCK

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

The for indicação

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;
}

The foreach indicação

Form: LABEL: foreach VAR (EXPR) BLOCK

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

The last Operator

last, next e redo os operadores que seguem, aplicam-se somente às estruturas do controle do laço. Fazem com que a execução da indicação salte da posição onde ocorrem a alguma outra posição, com respeito à estrutura de bloco da estrutura abrangendo do controle. Conseqüentemente, funcionam como formulários limitados da indicação goto. O último no exemplo abaixo do controle das causas a saltar de onde ocorre à primeira indicação que segue o bloco incluindo.

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

Se a última lata ocorrer também dentro das estruturas aninhadas do controle, o salto pode ser feito à extremidade do laço exterior simplesmente adicionando uma etiqueta a esse laço e especificando a etiqueta na última indicação.

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

The next Operator

O "next" é similar ao último operador a não ser que essa execução salte à extremidade do bloco, mas remanesce ainda dentro do bloco, retirando rather o bloco. Conseqüentemente a iteração continua normalmente. Como com último, em seguida pode também ser usado com uma etiqueta saltar a um laço exterior.

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

The redo operator

“Redo” o operador é muito similar ao operador seguinte a não ser que isso a execução salte ao alto do bloco sem re-evaluation da expressão do controle. Como com último, em seguida pode também ser usado com a etiqueta saltar a um laço exterior.

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

Keywords:tutorial do Perl, certificados do Perl, Perl que programa, Perl ativo, download do Perl, Perl da amora, expressões regulares do Perl, split do Perl, disposição do Perl, página do certificado do Perl

HTML Quizes

XML Quizes