Latest web development tutorials

Заявление Гото Perl

цикл Perl цикл Perl

Perl имеет три формы: Гото получили Контрактное Гото EXPR и Гото & NAME:

Нет. Тип Гото
1 Гото LABEL

Найти помеченный оператор LABEL и повторно выполняется оттуда.

2 Гото EXPR

Гото EXPR форма Гото LABEL есть общий вид. Она выразила надежду на выражение генерирует имя тега, а также переход к отметке для выполнения.

3 Гото & NAME

Это работает дочерний процесс с помощью вызова именованным подпроцессов.

грамматика

Синтаксис выглядит следующим образом: 

goto LABEL

或

goto EXPR

或

goto &NAME

технологическая схема

примеров

Следующие два примера в переменной $ а 15 из выходных данных.

Ниже приводится обычно используемые примеры GOTO: 

#/usr/bin/perl
   
$a = 10;
LOOP:do
{
    if( $a == 15){
       # 跳过迭代
       $a = $a + 1;
       # 使用 goto LABEL 形式
       goto LOOP;
    }
    print "a = $a\n";
    $a = $a + 1;
}while( $a < 20 );

Вышеприведенная программа, выход: 

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

В следующем примере используется Гото форму EXPR. Мы использовали две строки и использовать точку (.) По ссылке. 

$a = 10;
$str1 = "LO";
$str2 = "OP";

LOOP:do
{
    if( $a == 15){
       # 跳过迭代
       $a = $a + 1;
       # 使用 goto EXPR 形式
       goto $str1.$str2;    # 类似 goto LOOP
    }
    print "a = $a\n";
    $a = $a + 1;
}while( $a < 20 );

Вышеприведенная программа, выход: 

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

цикл Perl цикл Perl