CPAN::Source - CPAN source list data aggregator.
CPAN::Source fetch, parse, aggregate all CPAN source list for you.
Currently CPAN::Source supports 4 files from CPAN mirror. (00whois.xml, contains cpan author information, 01mailrc.txt contains author emails, 02packages.details.txt contains package information, 03modlist contains distribution status)
CPAN::Source aggregate those data, and information can be easily retrieved.
The distribution info is from CPAN::DistnameInfo.
my $source = CPAN::Source->new( cache_path => '.cache', cache_expiry => '7 days', mirror => 'http://cpan.nctu.edu.tw', source_mirror => 'http://cpansearch.perl.org' ); $source->prepare; # use LWP::UserAgent to fetch all source list files ... # 00whois.xml # 01mailrc # 02packages.details.txt # 03modlist $source->dists; # all dist information $source->authors; # all author information for my $dist ( @{ $source->dists } ) { } for my $author ( @{ $source->authors ) { } for my $package ( @{ $source->packages } ) { } $source->packages; # parsed package data from 02packages.details.txt.gz $source->modlist; # parsed package data from 03modlist.data.gz $source->mailrc; # parsed mailrc data from 01mailrc.txt.gz my $dist = $source->dist('Moose'); my $distname = $dist->name; my $distvname = $dist->version_name; my $version = $dist->version; # attributes from CPAN::DistnameInfo my $meta_data = $dist->fetch_meta(); $meta_data->{abstract}; $meta_data->{version}; $meta_data->{resources}->{bugtracker}; $meta_data->{resources}->{repository}; my $readme = $dist->fetch_readme; my $changes = $dist->fetch_changes; my $pkg = $source->package( 'Moose' ); my $pm_content = $pkg->fetch_pm(); my $mirror_server_timestamp = $source->stamp; # DateTime object
Which is a hashref, contains:
{ {pauseId} => { ... } }
{ meta => { File => ... URL => ... Description => ... Line-Count => ... Last-Updated => ... }, packages => { 'Foo::Bar' => { package => 'Foo::Bar', version => 0.01 , path => tar path, dist => dist name } .... } }
Download 03modlist.data.gz and parse it.
Download 02packages.details.gz and parse it.
Return full-qualified source path. built from source mirror, the default source mirror is http://cpansearch.perl.org.
Return mirror info from mirror site. (07mirrors.json)
Return modules rss, from {Mirror}/modules/01modules.mtime.rss
Fetch recent updated modules,
my $list = $source->fetch_recent( '1d' ); my $list = $source->fetch_recent( '1M' );
return CPAN::Source::Dist object.
Use LWP::UserAgent to fetch content.
Convert CPAN::DistnameInfo into CPAN::Source::Dist.
Purge cache.
Yo-An Lin <cornelius.howl {at} gmail.com>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
1 POD Error
The following errors were encountered while parsing the POD:
'=item' outside of any '=over'
To install CPAN::Source, copy and paste the appropriate command in to your terminal.
cpanm
cpanm CPAN::Source
CPAN shell
perl -MCPAN -e shell install CPAN::Source
For more information on module installation, please visit the detailed CPAN module installation guide.