| Current Path : /usr/share/doc/perl-MetaCPAN-Client/examples/ |
| Current File : //usr/share/doc/perl-MetaCPAN-Client/examples/release.pl |
use strict;
use warnings;
use Data::Printer;
use MetaCPAN::Client;
my $release =
MetaCPAN::Client->new->release('Devel-NYTProf');
my %output = (
AUTHOR => $release->author,
DATE => $release->date,
STATUS => $release->status,
VERSION => $release->version,
TESTS => $release->tests,
);
p %output;