use base 'Foo';

----

use Foo;
our @ISA = qw( Foo );