my(%METHODS);
    our @EXPORT;

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

        @EXPORT = keys %METHODS;

        foreach my $method (keys %METHODS) {
            no strict 'refs';
            *$methods = sub {
                return $METHODS{ $method };
            };
        }
    }