package Mod; require Exporter; BEGIN { use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); %EXPORT_TAGS = (all => [qw(Foo Bar)]); @ISA = qw(Exporter); Exporter::export_ok_tags('all'); } sub Foo { die "I AM THE FOOO!!!" } package sorkeyso; BEGIN{ $INC{'Mod.pm'}=1} use Mod ':all'; Foo(); __END__ I AM THE FOOO!!! at - line 11.