#BarWrapper.pm
package BarWrapper;
use vars qw/@ISA @EXPORT_OK @SUBS/;
require Exporter;
@ISA = qw(Exporter);

@EXPORT_OK = qw(i_am_another_sub);

do "bar.pl";
do "foo.pl";
1;

##</code><code>##

#FooWrapper.pm
package FooWrapper;

use vars qw/@ISA @EXPORT_OK @SUBS/;
require Exporter;
@ISA = qw(Exporter);

@EXPORT_OK = qw(can_i_see_you dont_import_me );

do "foo.pl";
1;