memtime perl -e '$h = ""; $x = (2**31); vec($h,$x,8) = 0;' Negative offset to vec in lvalue context at -e line 1. Exit [255] 0.00 user, 0.00 system, 0.10 elapsed -- Max VSize = 3720KB, Max RSS = 128KB