如何在包含application / x-www-form-urlencoded數據的perl中發出HTTP PUT請求？

Question

如何在包含application/x-www-form-urlencoded數據的Perl中發出HTTP PUT請求？

這是等效的POST請求，可以正常工作：

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

作為PUT請求如何完成？ LWP中沒有put方法， HTTP::Request::Common中的PUT函數不采用表格數據。

有關是否允許帶有表單數據的PUT請求的討論，請參見HTTP PUT請求可以將application / x-www-form-urlencode編碼為Content-Type嗎？

這是一個PUT請求的示例，但其中不包含用於封裝表單數據的代碼： 如何使用LWP發出HTTP PUT請求？

Answer 1

只需執行POST -request並將其方法更改為PUT ：

use HTTP::Request::Common;

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

$req->method('PUT');

say($req->as_string);