use LWP::Simple;
use LWP::UserAgent;
use Data::Dumper;
use XML::Simple;

my $ua = new LWP::UserAgent;

my $response = $ua->get($xmlurl);
my $xmlString = $response->content;

my @options = ();
my $ref = XMLin($xmlString, @options);
print Dumper($ref);