Переходы

В perl есть метки и возможны переходы на них.
Команда goto имеет три варианта:

# Варианты перехода

goto метка;

goto выражение;

# перейти в функцию без стека и возврата

goto &функция;

# выражения

@a = ("LINK1", "LINK2");
goto $a[0];


На метки также можно выходить из циклов

# Выход из цикла

OUTER: for(;;) {
    if ($x) { last OUTER; }
}