如何使用Perl模块HTTP :: Async处理超时？

Question

我知道如何在使用LWP::UserAgent时处理HTTP::Request操作的timeout ，但是由于我需要使用HTTP::Async模块而不是Perl模块LWP::UserAgent ，我正在寻找替代解决方案为异步http请求设置超时。

Answer 1

你看过 文件了吗？

设置请求的默认超时：

# When creating the object:
my $async = HTTP::Async->new( timeout => 300 ); # 5 minutes
# Changing it later:
$async->timeout(600); # 10 minutes

要更改单个请求的超时：

$async->add_with_opts( $request, { timeout => 600 } ); # 10 minutes

更新 ：似乎有一个错误 ， timeout属性实际上不起作用。