C:\>perl -MPDL -MDevel::Peek -le "$pdl = random(); Dump $pdl->at.(0);"
SV = PV(0x1c544eeb140) at 0x1c544eeaa10
  REFCNT = 1
  FLAGS = (PADTMP,POK,pPOK)
  PV = 0x1c5474d1ca0 "0.2684813620074430"\0
  CUR = 18
  LEN = 20