rict;
use warnings;
use LWP::UserAgent;
use LWP::Protocol::https;
use HTTP::Request::Common;
use JSON;
use List::Util qw/min/;
use POSIX qw/floor/;
use Net::Payjp::Account;
use Net::Payjp::Charge;
u
ethods are generally named after the object name and the acquisition method.
This method returns json objects for responses from the API.
=head1 new Method
This creates a new Payjp api object. The
ayjp-Client-User-Agent' => JSON->new->encode($client),
);
my $res = $ua->request($req);
my $code = $res->code;
if($code == 200){
my $obj = $self->_to_object(JSON->new->decode($res->conten