Оператор безусловного перехода goto

Perl поддерживает оператор безусловного перехода goto , который является иден­тичным такому же оператору языка программирования С. Ниже приведен при­мер использования оператора goto для вывода чисел от 1 до 10:

$i = 1;

loop:

            print $i++, ‘ ’;

            if ($i <=10)

                        {

                                    goto loop;

                        }