Select Code to Download

#### Main.pm

...
*bn = \%Bus::by_name;

print $tn{Master}->name # Master

#### ChainSetup.pm

...

package ChainSetup;
my $master_fader = $tn{Master};

#### Globals.pm

...
package ChainSetup;
use Globals qw(%tn %ti %bn);
print $tn{Master}->name; # can't do method 'name' on undef

#### Globals.pm

...
eval $code;
die "error: $@ in eval of code: $code" if $@;