package Local::Patched::Foo; use strict; use warnings; no warnings 'redefine'; use parent 'Exporter'; use constant functions => qw( baz ); use Foo functions; our @EXPORT = functions; sub Foo::qux { print 2; }; 1;