package My::Module;
use base 'Exporter';
our @EXPORT = qw/asub1 asub2 asub3/;
use My::Module::Another;
sub import {
	warn "WARNING: Ignoring export list!" if @_>1;
	__PACKAGE__->export_to_level(1, $_[0]);
	My::Module::Another->export_to_level(1, $_[0]);
}