If you make the 'Primary' object a singleton then you can whip it up whenver you like:

 my $primary = Primary->instance;
 my $name = $primary->name;
 # or if you only need one item from it
 my $name = Primary->instance->name;
[download]

See code implementing a singleton at Re: how to make a universally inherited method?

Chris
M-x auto-bs-mode