'Account::' => *{'My::Module::Account::'}, #### { $ENV{PATH} = "/bin"; foreach my $module (keys %INC){ if($module =~ m/Account/){ print STDERR "The next module is: $module \n"; print STDERR `grep _GenerateAccountSummary $INC{$module}`; print STDERR "\n\n"; } } } #### The next module is: My/Module/Account.pm our @EXPORT = qw( . . . _GenerateAccountSummary . . . ); our %EXPORT_TAGS = ( all => [qw( . . . _GenerateAccountSummary . . . )] ); sub _GenerateAccountSummary {