#!/usr/bin/perl
#use integer;
my $max_neg_num=((2**32)-1);
print "\nmax neg num is $max_neg_num\n";
$error=4294967263 -$max_neg_num-1;
print "error is $error \n";