use Modern::Perl;
use My::Module;
use My::Module::Another;

##</code><code>##

use Modern::Perl;
use My::Module::Another;

##</code><code>##

My::Module::asub1();

##</code><code>##

use Modern::Perl;
use My::Module;

##</code><code>##

package My::Module;

use Exporter qw(import);

@EXPORT = qw(asub1 asub2 asub3);

...

1;

package My::Module::Another

use Exporter qw(import);

@EXPORT = qw(bsub1 bsub2 bsub3);

...

1;