perl - 在 perl 中运行并行 http post 请求

Question

我需要使用 perl 对多个 URL 并行使用 http POST 请求。我需要在代码中更改：

use LWP::UserAgent;

my $ua = LWP::UserAgent->new;

@urls = ('http://url1.com:10001','http://url2.com:10002','http://url3.com:10003');

foreach (@urls)
{
   my $req = HTTP::Request->new(POST => $_);
   my $resp = $ua->request($req);
}

此代码按顺序发送请求。但我需要并行发送请求以使请求更快。我们需要在上面的代码中改变什么？

提前致谢

Answer 1

在单独的线程中执行每个 POST。有关文档，请参见此处

 use threads;
 my $t = threads->create(...);