perl -MDevel::Peek -we '@f = (1.20 => "1.2"); Dump $f[0]; Dump $f[1]' SV = NV(0x88238e8) at 0x87fc230 REFCNT = 1 FLAGS = (NOK,pNOK) NV = 1.2 SV = PV(0x87f9044) at 0x87fc424 REFCNT = 1 FLAGS = (POK,pPOK) PV = 0x8806fc8 "1.2"\0 CUR = 3 LEN = 4