my $rss = new XML::RSS;
    $rss->parsefile("fm.rdf");

    foreach my $item (@{$rss->{'items'}}) {
        print "title: $item->{'title'}\n";
        print "link: $item->{'link'}\n\n";
    }