Help for this page

Select Code to Download


  1. or download this
    package main;
local $b = 2;
$main::b = 3;
print "$b\n"; # prints "3\n"