gistfile1.txt

MacBook-Pro-de-Fernando:test fernando$ cat ToUse.pm6 
unit class ToUse;

has %!bla;
my $instance = ::?CLASS.bless;
method new {!!!}
method instance {
	$instance
}
method getBla is export {
	%!bla
}


MacBook-Pro-de-Fernando:test fernando$ cat Use.pm6 
unit module Use;
use ToUse;

BEGIN {
	ToUse.instance.getBla()<test> = 42;
}
MacBook-Pro-de-Fernando:test fernando$ cat main.p6 
use Use;
use ToUse;

say ToUse.instance.getBla
MacBook-Pro-de-Fernando:test fernando$ perl6 -I. main.p6 
{}
MacBook-Pro-de-Fernando:test fernando$