package Foo;

sub bar : public { ... }

package Bar;
use base 'Foo';

sub bar : private { ... }

package Baz;
use base 'Bar';