use Foo;
my $foo = Foo->new();

##</code><code>##

package Foo::Bar;
use base("Foo");

sub some_method_in_foo_that_i_override {
    my $self = shift;
    # stuff
}

1;