a;
use strict;
use warnings;
our $VERSION = '0.05';
use List::Util qw(sum);
use HTTP::Tiny;
use JSON ();
use Devel::Cover::DB;
our $API_ENDPOINT =
($ENV{KRITIKA_HOST} || 'https://kritika.io') . '
;
}
sub _post {
my $class = shift;
my ( $token, $coverage ) = @_;
$coverage = JSON::encode_json($coverage);
my $ua = $class->_build_ua;
my $response;
for my $i ( 1 .. 3 ) {