sub Mod::foo { ... } #### use vars qw($Mod::var1 $Mod::var2 @Mod::var3 %Mod::etc); #### # Mod-part1.pm package Mod; use base qw(Meta); ... # Mod-part2.pm package Mod; use base qw(Meta); ...