Instrução goto Perl

Autor：Eve Cole Data da Última Atualização：2025-01-03 10:48:01

Perl tem três formas goto: got LABLE, goto EXPR e goto &NAME:

número de série	ir para o tipo
1	vá para LABEL Encontre a instrução marcada LABEL e execute-a novamente a partir daí.
2	vá para EXPR O formulário goto EXPR é apenas a forma geral de goto LABEL. Ele espera que a expressão gere um nome de tag e salte para essa tag para execução.
3	ir para&NOME Ele substitui o processo filho em execução por uma chamada para o processo filho nomeado.

gramática

O formato da sintaxe é o seguinte:

 vá para LABEL ou vá para EXPR ou vá para &NAME

fluxograma

Exemplo

Os dois exemplos a seguir saltam da saída quando a variável $a é 15.

A seguir está um exemplo de goto comumente usado:

Exemplo

#/usr/bin/perl $ a = 10 ; { se ( $uma == 15 ) { # Pular iteração $a = $a + 1 ; # Use o formulário goto LABEL imprimir " Sair da saída n " ; imprimir " Esta frase não será executada n " } imprimir " a = $ a n " ; $a = $a + 1 } enquanto ( $a < 20 ) ;

Executando o programa acima, o resultado de saída é:

 a = 10a = 11a = 12a = 13a = 14 salta da saída a = 16a = 17a = 18a = 19

Os exemplos a seguir usam o formulário goto EXPR. Usamos duas strings e as vinculamos usando um ponto final (.).

Exemplo

$ a = 10 ; $ str1 = " LO " ; $ str2 = " OP " ; { se ( $uma == 15 ) { # Pular iteração $a = $a + 1 ; # Use o formulário goto EXPR Vá para $str1 . $str2 ; # Semelhante a ir para LOOP } imprimir " a = $ a n " ; $a = $a + 1 } enquanto ( $a < 20 ) ;

Executando o programa acima, o resultado de saída é:

 a = 10a = 11a = 12a = 13a = 14a = 16a = 17a = 18a = 19