选项Perl中的HTTP请求

Question

需要在Perl中发送HTTP OPTIONS请求。 浏览了几个CPAN模块； 阅读文档，没有提到OPTIONS请求方法，只有GET，POST，PUT，DELETE。

我需要手动格式化吗？ 还是我的Google-fu可能缺少另一个库/模块？

Answer 1

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请求提供有用的响应来测试响应，但是在设置代理后检查该请求时，该请求看起来不错。