http://www.perlmonks.org?node_id=266730


in reply to Module/export problems

You're missing a ';' in the final example. In the above code you've shown, there is no sub Foo defined in package Mod; 
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.

[download]

MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
** The third rule of perl club is a statement of fact: pod is sexy.

In Section Seekers of Perl Wisdom