我正在使用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');
我测试了脚本无法检查并检查了请求标头。它没有任何以下键值对。
Keep-Alive 115
Connection keep-alive
需要有价值的输入。
答案 0 :(得分:1)
我相信您只需指定LWP::UserAgent->new(keep_alive => $maxrequests)
即可启用keepalive。它会自动为您设置连接缓存。