use Math::BigInt;
use Data::Dumper;
print Dumper +Math::BigInt->new(1)->blsft(8);
print $Math::BigInt::VERSION;

##</code><code>##

$VAR1 = '+256';
0.01

##</code><code>##

$result = 1;
$result += new Math::BigInt('1234567890' x 10);