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::]