From: Kazu Yamamoto (山本和彦) <kazu at example.com> Subject: [Mew-dist 11437] Re: 1.95b6.tar.gz and im-134.tar.gz > connect_server でブロックされた(刺さった)場合、alarm で die するしかあ > りません。(Perl には setjmp がないんだもん。) 大嘘でした。 alarm 関数が呼ばれて戻れば、connect() はちゃんと抜けて、次の行に制御が 移ります。$! にも EINTR がセットされます。なんとかなりますね。 Windows で試してほしいプログラムがありますので、後で送ります。 --かず