C:\test>perl -MDevel::Peek -we "$a=1.2;Dump($a);$b="$a";Dump($a)"
Name "main::b" used only once: possible typo at -e line 1.
SV = NV(0x1bc58c0) at 0x1bd2a50
  REFCNT = 1
  FLAGS = (NOK,pNOK)
  NV = 1.2
SV = NV(0x1bc58c0) at 0x1bd2a50
  REFCNT = 1
  FLAGS = (NOK,pNOK)
  NV = 1.2