diff --git a/bin/localstate.pl b/bin/localstate.pl index e6064f61847478ef08a82d3b13ce6bc4a3bed15d..8c2c01c3078a30b2b3036dca6d9ea55ec80c6530 100755 --- a/bin/localstate.pl +++ b/bin/localstate.pl @@ -269,8 +269,9 @@ if ( $result ) my $txn = rpc( $libbfa, 'eth_getTransactionCount', qq("$account"), '"latest"' ); $txn =~ s/^0x([a-fA-F\d]+)$/hex($1)/e; my $gold = rpc( $libbfa, 'eth_getBalance', qq("$account"), '"latest"' ); - $gold =~ s/^0x([a-fA-F\d]+)$/hex($1)/e; - printf "Account %d: %s %-6s %3d transaction%s, %d satoshi.\n", $i, $account, $maymine, $txn, ($txn==1?' ':'s'), $gold; + $gold = Math::BigInt->new( $gold ) if $gold =~ /^0x/; + #$gold = Math::BigInt->new( $gold ) if $gold =~ s/^0x([\da-fA-F]{2})/0x0000$1/; + printf "Account %d: %s %-6s %3d transaction%s, %s satoshi.\n", $i, $account, $maymine, $txn, ($txn==1?' ':'s'), $gold; } } else