my $url = "https://my rest services url";
my $jsonBody = '{ json details }';
my $client = REST::Client->new();
$client->addHeader('Content-Type', 'application/json');
$client->addHeader('charset', 'UTF-8');
$client->addHeader('Accept', 'application/json');
$client->addHeader('Authorization', 'Basic xxxxxxxxxxxxxxxxxxxxxxx');
$client->PUT($url, $jsonBody);