Question

I am trying to find a RSS parser that can be used with a Perl CGI script. I found simplepie and that’s really easy parser to use in PHP scripting. Unfortunately that doesn’t work with a Perl CGI script. Please let me know if there is anything that’s easy to use like simplepie.

I came across this one RssDisplay but I am not sure about the usage and also how good it is.

Answer 1

From CPAN: XML::RSS::Parser.

XML::RSS::Parser is a lightweight liberal parser of RSS feeds. This parser is “liberal” in that it does not demand compliance of a specific RSS version and will attempt to gracefully handle tags it does not expect or understand. The parser’s only requirements is that the file is well-formed XML and remotely resembles RSS.

#!/usr/bin/perl

use strict; use warnings;

use XML::RSS::Parser;
use FileHandle;

my $parser = XML::RSS::Parser->new;

unless ( -e 'uploads.rdf' ) {
    require LWP::Simple;
    LWP::Simple::getstore(
        'http://search.cpan.org/uploads.rdf',
        'uploads.rdf',
    );
}
my $fh = FileHandle->new('uploads.rdf');
my $feed = $parser->parse_file($fh);

print $feed->query('/channel/title')->text_content, "\n";

my $count = $feed->item_count;
print "# of Items: $count\n";

foreach my $i ( $feed->query('//item') ) {
    print $i->query('title')->text_content, "\n";
}