'0.4';
use strict;
use warnings;
use LWP::UserAgent;
use Ceph::RadosGW::Admin::HTTPRequest;
use JSON;
use Moose;
use URI;
use URI::QueryParam;
use Ceph::RadosGW::Admin::User;
use namespace::autoclea
thod, $path, %args) = @_;
my $content = '';
my $query_string = _make_query(%args, format => 'json');
my $request_builder = Ceph::RadosGW::Admin::HTTPRequest->new(
method => $method,
pa
line, $res->content, $req->as_string);
}
if ($res->content) {
my $data = eval {
JSON::decode_json($res->content);
};
if (my $e = $@) {
die "Could not deserialize server response: