#!/usr/bin/perl

use warnings;
use strict;


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




my $url = 'test.xml'; 
my $content = get $url; die "Couldn\'t get $url" unless $content; 

my $doc = XMLin( $content );

print Dumper($doc);