| Current Path : /usr/share/doc/perl-MetaCPAN-Client/examples/ |
| Current File : //usr/share/doc/perl-MetaCPAN-Client/examples/distribution.pl |
# examples/distribution.pl
use strict;
use warnings;
use Data::Printer;
use MetaCPAN::Client;
my $mcpan = MetaCPAN::Client->new();
my $dist = $mcpan->distribution('Moose');
my %output = (
NAME => $dist->name,
BUGS => $dist->bugs,
RIVER => $dist->river,
);
p %output;