Perl 中的 OPTIONS HTTP 请求

【问题标题】：OPTIONS HTTP Request in PerlPerl 中的 OPTIONS HTTP 请求
【发布时间】：2012-10-12 00:13:01
【问题描述】：

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

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

【问题讨论】：

标签： perl http request http-options-method

【解决方案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 请求提供有用响应来测试响应的服务器，但是当我在设置代理后对其进行检查时，该请求看起来正常。

【讨论】：

感谢@Quentin！奇迹般有效。 :)