ead1 EXPORT
=cut
use strict;
use warnings;
use HTTP::Request::Common;
use LWP::UserAgent;
use JSON;
use MIME::Base64 'encode_base64';
use Time::HiRes (qw(gettimeofday));
use DateTime;
use Sys::Hos
'extra' => $params->{'extra'} || {}
};
my $json = JSON->new->utf8(1)->pretty(1)->allow_nonref(1);
return $json->encode( $data );
}
1;
=head1 LICENSE AND COPYRIGHT
Copyrigh