需要在 Perl 中发送 HTTP OPTIONS 请求。浏览了几个CPAN模块;阅读文档,没有提到 OPTIONS 请求方法,只是 GET、POST、PUT、DELETE。
我需要手动格式化吗?或者我的 google-fu 是否可能缺少另一个库/模块?
需要在 Perl 中发送 HTTP OPTIONS 请求。浏览了几个CPAN模块;阅读文档,没有提到 OPTIONS 请求方法,只是 GET、POST、PUT、DELETE。
我需要手动格式化吗?或者我的 google-fu 是否可能缺少另一个库/模块?
该HTTP::Request
模块的文档说:
该方法应该是一个短字符串,如“GET”、“HEAD”、“PUT”或“POST”。
所以:
use v5.16;
use warnings;
use HTTP::Request;
use LWP::UserAgent;
my $ua = LWP::UserAgent->new;
my $request = HTTP::Request->new(OPTIONS => 'http://www.example.com/');
my $response = $ua->request($request);
我没有对 OPTIONS 请求提供有用响应来测试响应的服务器,但是当我在设置代理后检查它时,请求看起来不错。