D:\>perl -E "say [1]; say 0+[1]"
ARRAY(0x24e6d8)
2418704