use Devel::Peek;
use Scalar::Util qw/dualvar/;

my @x = ("0 ",dualvar(0,"0 "));
(10.2+$_).$_ for @x;
Dump $x[0];
Dump $x[1];

##</code><code>##

SV = PVNV(0x830ef78) at 0x8310564
  REFCNT = 1
  FLAGS = (IOK,NOK,POK,pIOK,pNOK,pPOK)
  IV = 0
  NV = 0
  PV = 0x835465c "0 "\0
  CUR = 2
  LEN = 4
SV = PVNV(0x830ef8c) at 0x8310584
  REFCNT = 1
  FLAGS = (IOK,NOK,POK,pIOK,pNOK,pPOK)
  IV = 0
  NV = 0
  PV = 0x833b77c "0 "\0
  CUR = 2
  LEN = 4