В Perl существует оператор goto хотя где , как и когда его применять как говорил Ходжа Насреддин "Тонкий философский вопрос". Для начинающих программистов которым от так "нужен" я бы вообще посоветовал "забыть" о его существовании. Однако при создании больших производственных задач на последнем этапе особенно при отработке "отвальных" ошибочных ситуаций конечно goto нужен.
В Perl реализовано три формы goto. goto - метка, goto - выражение
и goto - подпрограмма.
| goto | метка выполняет непосредственный переход на указанную метку. |
|---|---|
| goto - выражение | Вычисляет имя метки и делает соответствующий переход.
Например если мы хотим сделать переход на одну из трех меток
"M1:", "M2:" или "M3:" в зависимости от значений переменной
$i равной 0, 1 или 2 то это лучше сделать следующим образом: goto ("M1", "M2", "M3")[$i]; здесь $i используется как индекс массива указанного непосредственно
в выражении. |
| goto подпрограмма | довольно редкий случай т.к. всегда проще и надежней вызвать подпрограмму "естественным" образом. |