The Perl Advent Calendar needs more articles for 2022. Submit your idea today!
#!/usr/bin/perl -w
# this script adds a new item to an existing rss file and
# updates the channel date and publisher

use XML::RSS;

# create a new instance of the XML::RSS
my $rss = XML::RSS->new;

# parse the local file

# add a new item to the file
   title       => "QScheme 0.2.2",
   link        => "",
   description => "Really fast, small and easy to interface Scheme interpreter",
   dc => {
     subject  => "X11/Utilities",
     creator  => "David Allen (s2mdalle at",

# update the dublin core information for the channel
$rss->channel(dc => {
		 date => "2000-01-01T12:00+00:00",
		 publisher => "Jonathan Eisenzopf (eisen\"

# print the new rss file as a string. We could also save it
to a file with the save() routine.
print $rss->as_string;