2

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

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

4

1 回答 1

5

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

于 2012-10-22T08:32:21.113 回答