#!/usr/bin/perl
use Math::BigInt;

my $bignum = Math::BigInt->new('9007199254740991');

print $bignum->as_bin(),"\n";