Perl goto 函式

描述

此函式有三種形式，第一種形式使當前執行點跳轉到稱為LABEL的點。這種形式的goto不能用於跳轉到迴圈或外部函式中。你只能跳轉到相同作用域內的點。

第二種形式期望EXPR計算結果為可識別的LABEL。通常，你應該能夠使用正常的條件語句或函式來控制程式的執行，因此它的使用已不被推薦。

第三種形式用名為子程式的呼叫替換當前正在執行的子程式。新子程式繼承了原始子程式的引數棧和其他特性；新子程式甚至不可能知道它是被另一個名稱呼叫的。

語法

以下是此函式的簡單語法：

goto LABEL

goto EXPR

goto &NAME

返回值

此函式不返回任何值。

示例

以下是顯示其基本用法的示例程式碼：

#!/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