Help for this page

Select Code to Download


  1. or download this
    use Devel::Peek;
$_ = 'blah';
...
    MG_TYPE = 'g'
    MG_LEN = -1
  2. or download this
    use Devel::Peek;
$_ = 'blah';
...
    MG_VIRTUAL = &PL_vtbl_mglob
    MG_TYPE = 'g'
    MG_LEN = 1
  3. or download this
    $main::var = 12;
{
...
}
$$main::bar = 42;        # doesn't affect $main::var
print $main::var;        # prints: 12