Help for this page

Select Code to Download

Select or download this

local $foo = 1;
foo();
...
sub foo {
    print "foo: $foo\n";
}