package Fred;

require Exporter;
@ISA = qw( Exportor );
$VERSION = 1.01;

%EXPORT_TAGS = ( 'all' => [ qw( ) ] );
@EXPORT_OK = ( @{ $EXPORT_TAG{'all'} } );

my %METHODS = (
  foo => 'bar',
  bo  => 'baz',
);

@EXPORT = (keys %METHOD);

use strict;

foreach my $method (keys %METHODS) {
    *$method = sub {
        return $METHODS{ $method };
    };
}

die "Use of ", __PACKAGE__, " (v$VERSION) not supported.\n"
    if  ! prerequisites();

1;