Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

use Perl Log In

Log In

[ Create a new account ]

Journal of chorny (7137)

Friday January 02, 2009
08:42 AM

Automating Freshmeat submissions

[ #38203 ]

Reading about low number of Perl project announces on Freshmeat, I also thought about automating this. Freshmeat has XML-RPC interface for submitting new releases of existing Freshmeat projects. It requires Freshmeat login/pass, project id, branch name (list of them can be fetched using 'fetch_branch_list' method) - can be filled automatically if only one exists, new version, changes (string, no HTML, character limit 600 chars), release focus (number) and different URLs. Some of this fields are missing in CPAN distibutions, so they need to be stored somewhere.

CPAN has 2 modules for XML-RPC: XML::RPC and RPC::XML. RPC::XML hangs on Windows, so I tried XML::RPC. XML::RPC had no tests, and thus failed installation, so I wrote very simple tests and new version was already released.

Example that fetches list of licenses from Freshmeat:

use XML::RPC;

my $xmlrpc = XML::RPC->new('http://freshmeat.net/xmlrpc/');
my $result = $xmlrpc->call( 'fetch_available_licenses', {} );

print join("\n",@$result);

Another CPAN module is WWW::Freshmeat. It can only fetch project description. It has only load test, so I added a real one.

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.