my $xmlresource = "http://prlmnks.org/rss/458722.xml";
use LWP::Simple;
my $xmlstring = get $xmlresource;
my $feed = $xml->XMLin($xmlstring);