CPAN::Groonga

ck
  CryptoTron::ClaimReward
  CryptoTron::CreateAccount

CPAN modules:

  URI
  LWP::UserAgent
  JSON::PP
  Try::Catch
  Inline::Python
  Bitcoin::Crypto::Base58

=head1 AUTHOR

Dr. Peter Netz, E<lt>

VERSION = '0.09';

# Load the required Perl modules or packages.
use URI;
use LWP::UserAgent;
use JSON::PP;

# Use Inline Python module to define a function.
use Inline Python => <<'END_OF_PYTHON_CODE

transaction';

# Set the request header.
$HEADER = [Accept => 'application/json',
           Content_Type => 'application/json'];

# Assemble the service url.
$SERVICE_URL_PRE = $API_URL.$API_PATH_PRE

  #
# @argument $content      Response content  (scalar)                           #
# @return   $json_encode  Encoded content   (scalar)                           #
# --------------------------------