#! perl -w
my $bignum = 17298208768;
print $bignum, $/;
print $bignum / 1024, $/;

print int($bignum), $/;
print int($bignum/1024), $/;

print $_, ' : ', 2**$_,$/ for (32..64);

printf "%d : %20.0f\n", $_, 2**$_ for (50..57);
__END__
# Output
C:\test>192471
17298208768
16892782
17298208768
16892782
32 : 4294967296
33 : 8589934592
34 : 17179869184
35 : 34359738368
36 : 68719476736
37 : 137438953472
38 : 274877906944
39 : 549755813888
40 : 1099511627776
41 : 2199023255552
42 : 4398046511104
43 : 8796093022208
44 : 17592186044416
45 : 35184372088832
46 : 70368744177664
47 : 140737488355328
48 : 281474976710656
49 : 562949953421312
50 : 1.12589990684262e+015
51 : 2.25179981368525e+015
52 : 4.5035996273705e+015
53 : 9.00719925474099e+015
54 : 1.8014398509482e+016
55 : 3.6028797018964e+016
56 : 7.20575940379279e+016
57 : 1.44115188075856e+017
58 : 2.88230376151712e+017
59 : 5.76460752303423e+017
60 : 1.15292150460685e+018
61 : 2.30584300921369e+018
62 : 4.61168601842739e+018
63 : 9.22337203685478e+018
64 : 1.84467440737096e+019
50 :     1125899906842624
51 :     2251799813685248
52 :     4503599627370496
53 :     9007199254740992
54 :    18014398509481984
55 :    36028797018963968
56 :    72057594037927936
57 :   144115188075855870

C:\test>