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