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