<div>Disregard, я думал ты мне ответил. Удалять оверквотинг в 21 веке плохо :)</div><br clear="all">-- <br>Alex Kapranoff.<br>
<br><br><div class="gmail_quote">2010/1/29 Alex Kapranoff <span dir="ltr"><<a href="mailto:kapranoff@gmail.com">kapranoff@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">
<div class="gmail_quote">2010/1/29 Dmitry Karasik <span dir="ltr"><<a href="mailto:dmitry@karasik.eu.org" target="_blank">dmitry@karasik.eu.org</a>></span><div class="im"><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div>><br>
> perl -E 'sub foo { eval "sleep 10" } { local $SIG{ALRM} = sub { goto EXIT; };<br>
> alarm 1; foo(); EXIT: alarm 0; say "exited" }'<br>
<br>
</div>оно не работает если "sub foo { sleep 10 }"<br></blockquote><div><br></div></div><div>Нет:</div><div><br></div><div>perl -E 'sub foo { eval "sleep 10" } { local $SIG{ALRM} = sub { goto EXIT; }; alarm 1; foo(); say "after foo"; EXIT: alarm 0; say "exited" }'</div>
<div><br></div></div>
</blockquote></div><br>