如何使用LWP发出HTTP PUT请求?

Ste*_*eve 6 perl http perl-module lwp-useragent

我正在尝试将此请求更改为HTTP PUT请求,任何想法如何?

my $request = LWP::UserAgent->new; 
my $response = 
        $request->get($url, "apikey", $apiKey, "requestDate", $requestDate);
Run Code Online (Sandbox Code Playgroud)

gan*_*ass 10

你应该使用HTTP :: Request:

use LWP::UserAgent;
use HTTP::Request;

my $ua = LWP::UserAgent->new;
my $req = HTTP::Request->new("PUT", $url); 

my $res = $ua->request($req);
Run Code Online (Sandbox Code Playgroud)