Perl goto语句 goto语句|Perl

Perl goto语句是跳转语句。它通过跳到循环内的其他标签来转移控制权。
共有三种goto形式：
转到标签：
它跳转到标有LABEL的语句, 并从此处恢复正常执行。
转到EXPR：
它是goto LABEL的概括。该表达式返回标签??名称, 然后跳转到该标签语句。
转到＆NAME：
对于当前运行的子例程, 它将调用替换为命名子例程。
Perl goto语句的语法如下：

goto LABELorgoto EXPRorgoto & NAME

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

LOOP:doprint "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"; }

【Perl goto语句】输出

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