Help for this page

Select Code to Download


  1. or download this
    use Devel::Peek;
    use Scalar::Util qw/dualvar/;
    
    ...
    (10.2+$_).$_ for @x;
    Dump $x[0];
    Dump $x[1];
    
  2. or download this
    SV = PVNV(0x830ef78) at 0x8310564
      REFCNT = 1
      FLAGS = (IOK,NOK,POK,pIOK,pNOK,pPOK)
    ...
      PV = 0x833b77c "0 "\0
      CUR = 2
      LEN = 4