Help for this page

Select Code to Download


  1. or download this
    sub foo { "foo" }
$fooref = \*foo;
...

print *foo{CODE};
print *bar{CODE};
  2. or download this
    sub foo { "foo" }
$fooref = \*foo;
...

print *foo{CODE};
print *bar{CODE};
  3. or download this
    $bar = 1;
$barref = \*bar;
...
print *bar{SCALAR};
*$barref = sub { "bar" };
print *bar{SCALAR};