Help for this page

Select Code to Download


  1. or download this
    use Devel::Peek;
my $value = "four";
...
  REFCNT = 2
  FLAGS = (PADBUSY,PADMY)
foreach value: one      function value:
  2. or download this
    use Devel::Peek;
my $value = "four";
...
  CUR = 4
  LEN = 8