[frank@kungfu:~]$ more test.pl

use Math::BigInt;

my $i = Math::BigInt->new( '1147483648' );

print "Number: $i\n";

$i++;

print "Number: $i\n";

$i->badd( 1147483648 );

print "Number: $i\n";

$i->badd( 1147483648 );

print "Number: $i\n";

[frank@kungfu:~]$ perl test.pl
Number: 1147483648
Number: 1147483649
Number: 2294967297
Number: 3442450945
[frank@kungfu:~]$