Select Code to Download

$n = 9_007_199_254_740_992; print 'Even' unless $n % 2;;
Even

++$n; print 'Even' unless $n % 2;;
Even

my( $loWord, $hiWord ) = ( $n & 0xffff, $n >> 16 );

print unpack 'N', pack 'N', 99_999_999_999;;
4294967295

printf "%d\n", 99_999_999_999;;
-1

my $indexSize = 4 * $noLines;