Help for this page

Select Code to Download


  1. or download this
    use strict;
use Devel::Peek;
...
Dump($a);
print $a;
Dump($a);
  2. or download this
    C:\Users\ian>perl test.pl
SV = NULL(0x0) at 0x1d9ec1c
...
  CUR = 1
  LEN = 4
5
  3. or download this
    SV = NULL(0x0) at 0x1d9ec1c
  REFCNT = 1
  FLAGS = (PADMY)
  4. or download this
    SV = IV(0x1d9ec18) at 0x1d9ec1c
  REFCNT = 1
  FLAGS = (PADMY,IOK,pIOK)
  IV = 4
  5. or download this
    SV = PVIV(0x1d91c34) at 0x1d9ec1c
  REFCNT = 1
...
  PV = 0x1dbdf84 "4"\0
  CUR = 1
  LEN = 4
  6. or download this
    SV = PVIV(0x1d91c34) at 0x1d9ec1c
  REFCNT = 1
...
  PV = 0x1dbdf84 "4"\0
  CUR = 1
  LEN = 4
  7. or download this
    SV = PVIV(0x1d91c34) at 0x1d9ec1c
  REFCNT = 1
...
  PV = 0x1dbdf84 "5"\0
  CUR = 1
  LEN = 4