$ perl -V:ivsize
ivsize='4';

$ perl fudge
{ 22 => 10000 }


$ perl fudge
{ 4 => 8268, 11 => 1732 }