Help for this page

Select Code to Download


  1. or download this
    use Safe;
use Devel::Peek;
...
print Dump(Safe->new->reval($r));
print Dump(eval $r);
print Dump(Safe->new->reval($r));
  2. or download this
    SV = RV(0x1847158) at 0x1830630
  REFCNT = 1
...
    NV = 0
    PV = 0
    STASH = 0x18d8b90   "x"