| Current Path : /proc/thread-self/root/usr/share/doc/perl-MetaCPAN-Client/examples/ |
| Current File : //proc/thread-self/root/usr/share/doc/perl-MetaCPAN-Client/examples/author.pl |
# examples/author.pl
use strict;
use warnings;
use Data::Printer;
use MetaCPAN::Client;
my $author =
MetaCPAN::Client->new()->author('XSAWYERX');
my %output = (
NAME => $author->name,
EMAILS => $author->email,
COUNTRY => $author->country,
CITY => $author->city,
PROFILE => $author->profile,
LINKS => $author->links,
RELEASE_COUNTS => $author->release_count,
);
p %output;