::PerlGuardServer;
use Moo;
extends 'PerlGuard::Agent::Output';
use HTTP::Async;
use Encode;
use JSON;
use HTTP::Request;
use HTTP::Headers;
use Time::HiRes;
has api_key => ( is => 'rw', lazy => 1,
=> shift->api_key,
'content-type' => 'application/json'
)
});
has json_encoder => ( is => 'rw', lazy => 1, default => sub { JSON->new->utf8->convert_blessed->allow_blessed });
sub DEFAU
sum_of_web_transactions" => $profile->webservice_transaction_count,
};
$content = $self->json_encoder->encode($content);
};
#warn $content;
$self->check_responses();
unless($s