1. WIKI教程
2. 学习Perl
3. goto

goto

描述 (Description)

此函数有三种形式，第一种形式使当前执行点跳转到称为LABEL的点。 此表单中的goto不能用于跳转到循环或外部函数。您只能跳转到同一范围内的某个点。

第二种形式要求EXPR评估为可识别的LABEL。 通常，您应该能够使用正常的条件语句或函数来控制程序的执行，因此不推荐使用它。

第三种形式替换对当前运行的子例程的命名子例程的调用。 新子例程继承了原始子例程的参数堆栈和其他特性; 新的子程序甚至不可能知道它是由另一个名称调用的。

语法 (Syntax)

以下是此函数的简单语法 -

goto LABEL
goto EXPR
goto &NAME

返回值 (Return Value)

此函数不返回任何值。

例子 (Example)

以下是显示其基本用法的示例代码 -

#!/usr/bin/perl
$count = 0;
START:
$count = $count + 1;
if( $count > 4 ) {
   print "Exiting program\n";
} else {
   print "Count = $count, Jumping to START:\n";
   goto START;
}

执行上述代码时，会产生以下结果 -

Count = 1, Jumping to START:
Count = 2, Jumping to START:
Count = 3, Jumping to START:
Count = 4, Jumping to START:
Exiting program