Indeed, the docs aren't very clear on how things work. Nevertheless, I managed to create a small example of how to get to the content of entries:
#!/usr/bin/perl
use strict;
use warnings;
use XML::Atom::Feed;
use XML::Atom::Entry;
use Text::Wrap;
my $feed = XML::Atom::Feed->new("/home/arjen/atomfeed.xml");
foreach my $entry ($feed->entries()) {
print "* ", $entry->title(), "\n";
my $body = $entry->content()->body();
$body =~ s/^\s*//g;
$body =~ s/\s*^//g;
print wrap('', '', $body), "\n\n";
}
The file /home/arjen/atomfeed.xml is a file with the contents of the Atom feed of Perl.com. You'd have to change to your own file, of course :-)
It isn't HTML, but I think this is a nice starting point.
Arjen |