#!/usr/bin/perl

use XML::RAI;
my $xml=`curl -ksS "https://forums.com/rss.php?forumID=143"`;
$xml =~ s/\15//g;
my $feed = XML::RAI->parse($xml);

for ( reverse (@{$feed->items}) ){
    my $title=$_->title;
    my $date =$_->created ;
    my $date_modified;
    my $url =$_->link ;
	}