Select Code to Download

package Foo; 
our $bar; # declares $Foo::bar for rest of lexical scope 
...

package Bar; 
print $bar; # prints 20, as it refers to $Foo::bar