>perl -MDevel::Peek -E "$x=2/1; Dump$x; $y=$x*2; Dump$x; Dump$y"
SV = NV(0xd75628) at 0xd75640
  REFCNT = 1
  FLAGS = (NOK,pNOK)
  NV = 2
SV = PVNV(0xe26078) at 0xd75640
  REFCNT = 1
  FLAGS = (IOK,NOK,pIOK,pNOK)
  IV = 2
  NV = 2
  PV = 0
SV = IV(0xd75a80) at 0xd75a90
  REFCNT = 1
  FLAGS = (IOK,pIOK)
  IV = 4