Уважаемое сообщество, приветствую!
Подскажите, может кто-нибудь знает,
способ глобально выйти (сделать return) из вложенных подпрограмм (функций)
по метке,
т.е. аналогично *last* для управления циклом
?
Например:
_Metka:
&aaa( @args );
$@ && say $@;
exit;
#--------------------
sub aaa {
# ...
&bbb;
# ...
}
#--------------------
sub bbb {
# ...
&ccc;
# ...
}
#--------------------
sub ccc {
# ...
&ccc;
# ...
$@ = $results;
return _Metka;
}
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
