use XML::Simple;
use Data::Dumper;
my $XMLRef    = XMLin('new.xml');
print Dumper $XMLRef;