Select Code to Download

print Util::Stuff::aaa1->flag; # yields 10
...
...
...
our $v = 'Util::Stuff::aaa1->flag';
print "$$v\n";                 # yields nothing

our $v = 'Util::Stuff::aaa1';
print $v->flag;