DB<46> $x=0;for(1..2**31-2) {print;last if $x++>5}
1234567
  DB<47> $x=0;for(1..2**31-1) {print;last if $x++>5}
Range iterator outside integer range at (eval 51)[/usr/share/perl/5.10/perl5db.pl:638] line 2.