localstate ahora puede trabajar con valores grandes

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