Help for this page

Select Code to Download

Select or download this

$ perl -MScalar::Util=weaken -MDevel::Peek -wE'
   my $y;
...
      REFCNT = 2
      FLAGS = (PADMY,ROK,WEAKREF)
      RV = 0x998c768