require A; A->import() if A->UNIVERSAL::can('import');
*test1 = sub { ... };
require B; B->import() if B->UNIVERSAL::can('import');
*test2 = sub { ... };
print 'begin';
test1();
print 'i';
print 'j';