$ perl -wMstrict -MDevel::Peek -le '$a=1; $b="$a"; Dump($a)'
SV = PVIV(0x5841e3fdfc40) at 0x5841e3fe36e0
  REFCNT = 1
  FLAGS = (IOK,POK,pIOK,pPOK)
  IV = 1
  PV = 0x5841e4024ad0 "1"\0
  CUR = 1
  LEN = 10