Perl goto表達式

語法

定義和用法

• 第一種形式是導致當前執行點跳轉到被稱為LABEL點。在這種形式的GOTO不能被用來跳轉到一個循環或外部函數。在相同的範圍內，你隻能跳到一個點。
• 第二種形式，預計EXPR進行計算可識彆的標簽。在一般情況下，你應該能夠正常使用條件語句或函數來控製程序執行的，所以它的使用已過時。
• 第三種形式的替代品命名的子程序調用當前正在執行的子程序。新的子程序繼承了原子程序的參數堆棧和其他功能；新的子程序，甚至變得不可能知道它被稱為另一個名字。

返回值

• Nothing

例子

試試下麵的例子：

#!/usr/bin/perl
#by www.gitbook.net

$count = 0;

START:
$count = $count + 1;

if( $count > 4 ){
        print "Exiting program\n";
}else{
    print "Count = $count, Jumping to START:\n";
    goto START;
}

It produces following result

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