use Moose;
our $VERSION = '1.0000'; # VERSION
#use Data::Dump;
use HTTP::Request;
use JSON qw(to_json from_json);
use LWP::UserAgent;
use Parallel::ForkManager;
has email => ( is => 'ro', isa =>
$self->email, $self->password);
$agent->default_header(Accept => 'application/json');
return $agent;
},
handles => [qw(get request)],
);
has base_uri => (
is =
_;
my ($response, $data);
#$response = $self->agent->get($self->base_uri);
#dd from_json $response->content;
#exit;
#$response = $self->agent->get($data->{versions}[0]);
$re