ception::Response;
use MooX::Types::MooseLike::Base qw/Bool/;
use MooseX::Params::Validate;
use JSON::Any;
use LWP::UserAgent;
has base_url => (
is => 'rw',
required => 1,
w
cols_allowed => [ 'http', 'https'],
default_header => [ Accept => 'application/json' ],
);
},
);
has auth_token => (
is => 'rw',
lazy => 1,
default
query_params => { isa => 'HashRef', optional => 1, },
);
my $json = JSON::Any->objToJson(
{
query => $params{query_string},
params => $para