📌  相关文章
📜  Perl Goto

📅  最后修改于: 2021-01-07 08:18:06             🧑  作者: Mango

Perl goto声明

Perl goto语句是跳转语句。通过跳转到循环内的其他标签来转移控制。

共有三种goto形式：

转到标签：

它跳转到标有LABEL的语句，并从此处恢复正常执行。

转到EXPR：

它是goto LABEL的概括。该表达式返回标签名称，然后跳转到该标签语句。

转到＆NAME：

对于当前运行的子例程，它将调用替换为命名子例程。

Perl goto语句的语法如下：

goto LABEL

or

goto EXPR

or

goto &NAME

Perl goto语句示例

让我们看一个使用Perl语言使用goto语句的简单示例。

LOOP:do
print "You are not eligible to vote!\n";
print "Enter your age\n";
$age = <>;
    if( $age < 18){ 
       goto LOOP;
    }
    else{ 
    print "You are eligible to vote\n"; 
}

输出：

You are not eligible to vote!
Enter your age:
11
You are not eligible to vote!
Enter your age:
5
You are not eligible to vote!
Enter your age:
26
You are eligible to vote!