Perl 循环
Perl 有三种 goto 形式：got LABLE，goto EXPR，和 goto &NAME：
找出标记为 LABEL 的语句并且从那里重新执行。
goto EXPR 形式只是 goto LABEL 的一般形式。它期待表达式生成一个标记名称，并跳到该标记处执行。
它把正 在运行着的子进程替换为一个已命名子进程的调用。
语法格式如下所示：
goto LABEL 或 goto EXPR 或 goto &NAME
