#!/usr/bin/perl -w use strict; use XML::RSS; my $rss = new XML::RSS (version => '0.91'); $rss->channel(title => 'Linux Gazette', link => 'http://linuxgazette.net', language => 'en', description => 'An e-zine dedicated to making Linux just a little bit more fun. Published the first day of every month. <br>Issue 105: August, 2004', copyright => 'Copyright (c) 1996-2004 the Editors of Linux Gazette', managingEditor => 'email@here.com', webMaster => 'email@here.com'); $rss->image(title => 'Linux Gazette', url => 'http://linuxgazette.net/gx/2004/newlogo-blank-100-gold2.jpg', link => 'http://www.linuxgazette.net/', width => '99', height => '42'); $rss->add_item(title => 'Securing a New Linux Installation', link => 'http://linuxgazette.net/105/odonovan.html', description => 'By Barry O\'Donovan'); $rss->save("perl-test.rss");