Parsing RSS feeds
del.icio.us is a neat service for managing an online bookmark collection. With a little bit of Perl and a few CPAN modules, you can fetch your most recent bookmarks and include them as links on your homepage.
The sample script could be used in a cronjob and creates a file on you local server. It downloads my del.icio.us bookmark feed, chops it down to the ten most recent bookmarks and writes a unordered bullet list. You may need to adapt the template to your specific needs.
#!/usr/local/perl/bin/perl
use strict;
use warnings;
use LWP::Simple;
use XML::RSS;
use HTML::Template;
my $file = 'include_links.txt';
my @links;
my $tmpl = HTML::Template->new(filename => 'rssFetch.tmpl');
my $rss = XML::RSS->new();
my $data = get( 'http://del.icio.us/rss/mahler' ); # RSS Source
$rss->parse( $data );
$#{$rss->{'items'}} = 9; # Only the 10 most recent items
foreach my $item ( @{ $rss->{'items'} } ) {
push @links, +{ description => $item->{'dc'}->{'subject'},
url => $item->{'link'},
title => $item->{'title'}
}
};
$tmpl->param( links => @links );
open (FILEWRITE, ">$file");
print FILEWRITE $tmpl->output();
close FILEWRITE;
exit();