Coro + Coro::LWP冻结

Question

我有使用Coro，Coro::LWP和LWP::UserAgent的脚本。我创建了一个请求数组，并通过Coro的async {}运行它们。然后我使用它们的结果并保存到文件中。脚本运行几个小时，有时甚至几分钟，然后就会冻结。我已经做了一个strace查询，看看它在做什么。有一堆操作，但在保存结果后，在冻结之前有这样的操作：

rt_sigprocmask(SIG_BLOCK, [CHLD], [], 8) = 0
rt_sigaction(SIGCHLD, NULL, {SIG_DFL, [], 0}, 8) = 0
rt_sigprocmask(SIG_SETMASK, [], NULL, 8) = 0
nanosleep({1211417888, 0}, {1211354002, 168413065}) = ? ERESTART_RESTARTBLOCK (To be restarted)
--- SIGWINCH (Window changed) @ 0 (0) ---
restart_syscall(<... resuming interrupted call ...>) = ? ERESTART_RESTARTBLOCK (To be restarted)
--- SIGWINCH (Window changed) @ 0 (0) ---
restart_syscall(<... resuming interrupted call ...>

理解冻结有什么奇怪的地方吗？

在PerlMonks上交叉发布。

解决:这是一个奇怪的睡眠，有很大的秒数(比如4000天)。

Answer 1

Coro是一个多任务协作库，因此协程必须显式地将控制权交给调度器。您对Perl /usleep的调用会阻塞整个Perl进程，并阻止其他代码运行；在这种情况下，您可以执行一个“非阻塞”休眠，只阻塞当前的协程：

use Coro;
use AnyEvent;
...
Coro::AnyEvent::sleep 5;

顺便说一句，除非你绝对需要LWP的接口，否则我强烈建议切换到AnyEvent::HTTP。LWP是一种黑客技术，它对LWP的内部结构高度敏感，并且容易冻结。HTTP解决了我的程序锁定的几个问题，还提供了对SSL证书验证和代理(包括socks代理)使用的更好控制。总体而言，它只是一个更好、更有特色的模块。