Help for this page

Select Code to Download

Select or download this

int
conceal(int var)
...
    SvREFCNT_dec((SV *) addr);
  OUTPUT:
    RETVAL

Select or download this

use Devel::Reference;

...
# the refcount of [1,2,3] REMAINS at 1

print "@$y\n";  # "1 2 3"