一起使用 LWP::UserAgent 和 HTTP::Request 因为它也很常见,如果不是更频繁的练习,我对标准的 POST 和 GET / request 几乎没有在 SO 除了 json 之外讨论过,因为它们非常广泛多数使用。
邮政
my $ua = LWP::UserAgent->new();
my $req = new HTTP::Request(
'POST' => "http://url/path",
['Content-Type' => 'application/x-www-form-urlencoded; charset=UTF-8'],
'par1=par1value&par2=par2value'
);
$ua->request($req);
同样对于 GET
my $ua = LWP::UserAgent->new();
my $req = new HTTP::Request(
'GET' => "http://url/path",
['Content-Type' => 'application/x-www-form-urlencoded; charset=UTF-8'],
'par1=par1value&par2=par2value' # or I presume attaching the query string directly to the url
);
$ua->request($req);
另一种格式形式,其中前两个参数(方法和url)没有融合成一个,不像前面那样,而是分开
my $request = HTTP::Request->new( 'POST', $url, [ parameter1 => 'parameter1Value' ] );
request->header( 'Content-Type' => 'application/json' )
有一个类似的问题,但只考虑 LWP 和 Json,但它可能只能通过使用 LWP 和 HTTP::Request 来完成已经很明显了
如何使用 LWP 发出 JSON POST 请求?
注意:我也特别发布了这个,因为即使在文档
https://metacpan.org/pod/HTTP::Request中也没有提到 POST/GET 的具体/简洁用法