#!/usr/bin/perl
use strict;
use warnings;
use XML::RSS;

my $rss = new XML::RSS (version => '2.0');
$rss->channel(
    title          => 'freshmeat.net',
    link           => 'http://freshmeat.net',
    description    => 'the one-stop-shop for all your Linux software needs',
);

print $rss->as_string;