$ perl -MConfig -MB=svref_2object,SVf_IVisUV,SVf_NOK -e' $i = hex("7F".("FF"x($Config{ivsize}-2))."FD"); $sv = svref_2object(\$i); for (1..4) { ++$i; printf $sv->FLAGS & SVf_NOK ? "NV %.0f\n" : $sv->FLAGS & SVf_IVisUV ? "UV %u\n" : "IV %d\n", $i; } ' IV 2147483646 IV 2147483647 <-- 2**31 - 1 Largest IV UV 2147483648 UV 2147483649