| Current Path : /usr/share/doc/perl-MetaCPAN-Client/examples/ |
| Current File : //usr/share/doc/perl-MetaCPAN-Client/examples/permission.pl |
# examples/permission.pl
use strict;
use warnings;
use Data::Printer;
use MetaCPAN::Client;
my $mcpan = MetaCPAN::Client->new();
my $perm = $mcpan->permission('MooseX::Types');
p $perm;
1;
__END__
Alternatively:
my $module = $mcpan->module('MooseX::Types');
my $perm = $module->permission;