>
> perl -E 'sub foo { eval "sleep 10" } { local $SIG{ALRM} = sub { goto EXIT; };
> alarm 1; foo(); EXIT: alarm 0; say "exited" }'
оно не работает если "sub foo { sleep 10 }"
--
Sincerely,
Dmitry Karasik
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
