package MainOne;
sub foo { ...}

package NewPlugin;
unshift @MainOne::ISA, __PACKAGE__;

sub foo { warn "new plugin!" ... }