coro manager を捕まえる

ps したときに列挙される coro の中にある [coro manager] coro を捕まえた。main スレッドで作った coro の on_destroy コールバックで。

[takeyuki@sunya ~]$ perl -MCoro -e 'async{}->on_destroy(sub {print $Coro::current->desc."\n"});cede;'
[coro manager]

同じ on_destroy コールバックでも、cancel されたときは main スレッドで実行される。

[takeyuki@sunya ~]$ perl -MCoro -e '$x=async{cede while 1;};$x->on_destroy(sub {print $Coro::current->desc."\n"});cede;$x->cancel;'
[main::]