LWP::UserAgent 无法建立 'keep-alive' 连接

Question

我正在使用 LWP::UserAgent 连接来获取一些连接

 use LWP::UserAgent;
 use LWP::ConnCache;
 use  LWP::Debug qw(+);

 my $ua = LWP::UserAgent->new( conn_cache => 1);
 my $cache = $ua->conn_cache(LWP::ConnCache->new( ));
 $ua->conn_cache->total_capacity(undef);
 $ua->cookie_jar({});
 $ua->agent('Mozilla/5.0');
 $ua->add_handler("request_send",  sub { shift->dump; return });
 push @{$ua->requests_redirectable}, 'GET';

 $page = $ua->get('https://www.foo.com');

我测试了脚本无法运行并检查了请求 Header。它没有任何以下键值对。

  Keep-Alive    115
  Connection    keep-alive

需要宝贵的意见。

Answer 1

我相信您只需要指定 LWP::UserAgent->new(keep_alive => $maxrequests) 即可启用保活。它会自动为您设置连接缓存。

不过，我看不出有什么方法可以使号码不受限制。

LWP::UserAgent 无法建立 'keep-alive' 连接

LWP::UserAgent unable to establish 'keep-alive' connection

perl

lwp-useragent