#!/usr/bin/perl

use warnings;
use strict;

use LWP::Simple;
use XML::RSS::JavaScript;

my $feed = get('http://del.icio.us/rss/jimregan');
my $rss = XML::RSS::JavaScript->new;

$rss->parse($feed);
print $rss->as_javascript;
