Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use strict;
...

print "\$main::y:\n";
Dump($main::y);
  2. or download this
    $x:
SV = IV(0x9a32ac0) at 0x9a1775c
...
  REFCNT = 2
  FLAGS = (IOK,pIOK)
  IV = 10
  3. or download this
    #!/usr/bin/perl -w
use strict;
...

print "\$main::y:\n";
Dump($main::y);
  4. or download this
    $x:
SV = IV(0x9575ac0) at 0x955a75c
...
  REFCNT = 2
  FLAGS = (IOK,pIOK)
  IV = 10