in reply to PerlMonks Newest 10 Nodes Grabber
This is nice. And now that vroom has very nicely made
available the RDF file, we could use XML::RSS instead of
having to hand-code the extraction code (although hand-
coding is probably faster).
So here's the same thing but using XML::RSS:
#!/usr/local/bin/perl -w use strict; use constant URL => 'http://www.perlmonks.org/headlines.rdf'; use LWP::Simple; use XML::RSS; my $rss = new XML::RSS; $rss->parse( get URL ); for my $item (@{ $rss->{'items'} }) { print "<a href=", $item->{'link'}, ">", $item->{'title'}, "</a><br +>\n"; }
|
---|
In Section
Cool Uses for Perl