my $half = 32; # make 32 for 64-bit perls