perl - 选项 Perl 中的 HTTP 请求

Question

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

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

Answer 1

HTTP::Request 的文档模块说:

The method should be a short string like "GET", "HEAD", "PUT" or "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 请求提供有用的响应来测试响应，但当我在设置代理后检查它时，该请求看起来没问题。