package Two; use base 'One'; require Exporter; our @EXPORT = qw/foo/; *foo = \&One::foo; sub new { ... } sub newMethod { ... } sub overrideOldMethod { ... }