¿Cómo hacer una solicitud HTTP PUT utilizando LWP?

Question

Estoy tratando de cambiar esta solicitud a una solicitud HTTP PUT, ¿alguna idea de cómo?

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

Answer 1

Debe utilizar HTTP :: Solicitud:

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

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

my $res = $ua->request($req); 

Answer 2

PUT es HTTP :: :: Solicitud Común. Puede crear la solicitud primero y pasarla al agente de usuario.

use HTTP::Request::Common; 
use LWP; 

$agent = LWP::UserAgent->new; 
$request = HTTP::Request::Common::PUT($url, "apikey", $apiKey, "requestDate", $requestDate); 
$response = $agent->request($request); 

Answer 3

A partir de 6.04, LWP::UserAgent tiene un ayudante put, por lo que ahora puede hacer:

$ua->put($url)