Only for internal usage. Can contain breacking changes. DO NOT USE.
=cut
use REST::Client;
use JSON;
use Carp qw(confess);
use Crypt::JWT qw(encode_jwt);
use Data::UUID;
use Moo;
use plenigo::Ex;
on->access_token);
$client->addHeader('Content-Type', 'application/json');
$client->addHeader('Accept', 'application/json');
return $client;
}
sub _checkResponse {
my ($self, $client
ent->responseCode,
message => decode_json($client->responseContent)->{errorMessage} || 'Bad Request',
errorDetails => decode_json($client->responseContent || '{}'),
});
}
sub