view release on metacpan or  search on metacpan

lib/Acme/CM/Get.pm  view on Meta::CPAN

use warnings;

sub import {
    my $pkg  = shift;

    my $mod = shift or die "import(): Please supply module name";
    $mod = "Acme::CPANModules::$mod" unless $mod =~ /\AAcme::CPANModules::/;
    (my $mod_pm = "$mod.pm") =~ s!::!/!g;
    require $mod_pm;

    my $caller = caller();
    {
        no warnings 'once';
        # export $LIST
        *{"$caller\::LIST"} = \${"$mod\::LIST"};
    }
}

1;
# ABSTRACT: Shortcut to retrieve Acme::CPANModules list