Skip to content

Instantly share code, notes, and snippets.

@wchristian
Created August 11, 2010 20:23
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save wchristian/519673 to your computer and use it in GitHub Desktop.
Save wchristian/519673 to your computer and use it in GitHub Desktop.
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;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment