Select Code to Download

package MyModule;

...
my @PrivateArray = (5, 6, 7, 8); # not shared

1;

use MyModule;

print MyModule::SharedArray[1]; # prints 2