package Foo;
                                                                                
use base 'CGI::Application';
print "@ISA\n";
use Bar;
@ISA = ("Bar");
print "@ISA\n";

# at this point Foo only inherits from Bar

__END__
CGI::Application
Bar