如何在包含application/x-www-form-urlencoded数据的perl中发出HTTP PUT请求？

Question

如何在Perl中生成包含application/x-www-form-urlencoded数据的HTTP PUT请求？

这是一个有效的POST请求:

my $ua       = new LWP::UserAgent;
my $response = $ua->post(
    $url,
    {
        "parameter1" => $value1,
        "parameter2" => $value2
    }
);

如何作为PUT请求完成？putLWP中没有方法,PUT函数中HTTP::Request::Common没有表格数据.

有关允许带有表单数据的PUT请求的讨论,请参阅HTTP PUT请求是否可以将application/x-www-form-urlencoded作为Content-Type？

这是PUT请求的一个示例,但它不包含用于封装表单数据的代码:如何使用LWP发出HTTP PUT请求？

Answer 1

只需make POST-request并将其方法更改为PUT:

use HTTP::Request::Common;

my $req = POST('http://example.com/', Content => [param => 'value']);

$req->method('PUT');

say($req->as_string);