Writing a simple RSS aggregator.

[DigitalKitty]

Hi all.

I am in the process of writing an RSS aggregator for a professor and he is not willing to install modules himself or permit anyone else to do so ( annoying indeed ). Therefore, I am relegated to using regexes. In the process of testing the tool on thraxil.org, I noticed there is no output displayed. My code ( thus far ):

#!c:\perl\bin\perl.exe -w
use strict;
use LWP::Simple;
use CGI qw( :standard );

print "Content-type: text/html\n\n";
print start_html;
my $data = get("http://thraxil.org/rss");
my $scalar;

open (F, ">test.txt") or die $!;
print F $data;
close F;

open( F2, "<test.txt" ) or die "Error : $!\n";
while(<F2>) {

  if ( /<title>\s*(.*?)\s*<\/title><link>(.*?)<\/link>/m )
  {
     print "<a href=$2>$1</a><br><br>";
  }
}
close F2;
print end_html();

The rss source I am trying to parse can be seen at http://thraxil.org/rss.
I need to capture the title, link, and description data then display each group of three with the <link> info as a hyperlink to the article / node.

I feel as though I am quite close but a little assistance would be quite beneficial.

Thanks,
-Katie.