| Current Path : /usr/share/doc/perl-MetaCPAN-Client/examples/ |
| Current File : //usr/share/doc/perl-MetaCPAN-Client/examples/recent_today.pl |
use strict;
use warnings;
use Data::Printer;
use MetaCPAN::Client;
my $recent =
MetaCPAN::Client->new->recent('today');
while ( my $rel = $recent->next ) {
my %output = (
NAME => $rel->name,
AUTHOR => $rel->author,
DATE => $rel->date,
VERSION => $rel->version,
);
p %output;
}