Select Code to Download

package Foo;
use Mixin qw(frobnicate);
...

my $foo = Foo->new();
$foo->frobnicate();

package Mixin;
use base 'Exporter';
our @EXPORT_OK = qw(frobnicate);

sub frobnicate { print "frobnicating!\n"; }

package Mixin;
use base 'Exporter';
...
}

1;

use Mixin qw(frobnicate frobnerize);