CryptoTron::GetAccountNet - Perl extension for use with the blockchain of the crypto coin Tron.
use CryptoTron::GetAccountNet; # Set the public key as Base58 address. my $PublicKeyBase58 = "TY2fJ7AcsnQhfW3UJ1cjEUak5vkM87KC6R"; # Set the visible flag. my $VisibleFlag = ["True"|"False"|""]; # Set the control flag. my $ControlFlag = ["True"|"False"|""]; # Set the output format. my $OutputFormat = ["RAW"|"STR"|""]; # Request the account info from the mainnet. my $accountnet_info = GetAccountNet( PublicKey => $PublicKeyBase58 [, VisibleFlag => $VisibleFlag] [, ControlFlag => $ControlFlag] [, OutputFormat => $OutputFormat] ); # Print the account info into the terminal window. print $accountnet_info;
The module requests the bandwidth information of an Tron account from the Tron blockchain using the so-called full-node HTTP API from the Tron developer network. The module is designed for use with Tron Mainnet. For HTTP requests the methods POST or GET can be used in general. For the method GetAccount the needed method is POST. The payload of the HTTP request consists of the key 'address' and the key 'visible' and the related values. The switch 'visible' can be set to "True" or "False". If the switch is set to "True" a Base58 address is used. If the switch is set to "False" a Hex address is used. A request of the service API results in a response in JSON format. The module returns formatted string JSON data as well as unformated raw JSON data based on the output format flag. The parsing of the account information is done by a separate module.
POST
GET
GetAccount
GetAccountNet()
The named subroutine argument key PublicKey and the related value are mandatory, the named subroutine arguments keys OutputFormat as well as VisibleFlag and there values are optional. The value of the subroutine argument key PublicKey can be a Base58 address or a Hex address. The value of the subroutine argument key VisibleFlag can be "True" or "False".
PublicKey
OutputFormat
VisibleFlag
PublicKey: Base58 address => VisibleFlag: True PublicKey: Hex address => VisibleFlag: False
If the given combination is not valid, an error will be returned from the request.
The subroutine argument key ControlFlag and his value controls if the given combination address and visible should be checked. If visible is not set in a correct way, the value will be corrected if the flag is "True" and if the flag is "False" it will not be corrected.
ControlFlag
The subroutine argument key OutputFormat and his value controls wether the output is raw JSON or or formatted JSON.
<table> <tr><td>PARAMETE/td<td>DESCRIPTIO/td</tr> <tr><td>NetLimit</td><td>Total bandwidth obtained by staking</td></tr> <tr><td>freeNetLimit</td><td>Total free bandwidth</td></tr> <tr><td>TotalNetLimit</td><td>Total bandwidth can be obtained by staking</td></tr> <tr><td>TotalNetWeight</td><td>Total TRX staked for bandwidth</td></tr> </table>
# Load the required module. use CryptoTron::GetAccountNet; # Set the public key as Base58 address. my $PublicKeyBase58 = "TY2fJ7AcsnQhfW3UJ1cjEUak5vkM87KC6R"; # Set the visible flag. my $VisibleFlag = "True"; # Set the control flag. my $ControlFlag = "True"; # Set the output format. my $OutputFormat = "RAW"; # Request the account info from the mainnet. my $accountnet_info = GetAccountNet({ PublicKey => $PublicKeyBase58, VisibleFlag => $VisibleFlag, ControlFlag => $ControlFlag, OutputFormat => $OutputFormat }); # Print the account info into the terminal window. print $accountnet_info;
# Load the required module. use CryptoTron::GetAccountNet; # Set the public key as Base58 address. my $PublicKeyBase58 = "TY2fJ7AcsnQhfW3UJ1cjEUak5vkM87KC6R"; # Set the output format. my $OutputFormat = "STR"; # Request the account info from the mainnet. my $response = GetAccount({PublicKey => $PublicKeyBase58}); # Print the account info into the terminal window. print $response;
The module is working with the Tron Mainnet, but not with other existing Tron Testnets.
None
CryptoTron::JsonHttp
CryptoTron:ParseAccount
CryptoTron:AddressCheck
CryptoTron:AddressConvert
File::Basename
TRON Developer Hub
Dr. Peter Netz, <ztenretep@cpan.org>
Copyright (C) 2022 by Dr. Peter Netz
This library is free software; you can redistribute it and/or modify it under the same terms of The MIT License. For more details, see the full text of the license in the attached file LICENSE in the main module folder. This program is distributed in the hope that it will be useful, but without any warranty; without even the implied warranty of merchantability or fitness for a particular purpose.
1 POD Error
The following errors were encountered while parsing the POD:
Deleting unknown formatting code R<>
Deleting unknown formatting code N<>
To install CryptoTron::JsonHttp, copy and paste the appropriate command in to your terminal.
cpanm
cpanm CryptoTron::JsonHttp
CPAN shell
perl -MCPAN -e shell install CryptoTron::JsonHttp
For more information on module installation, please visit the detailed CPAN module installation guide.