use strict;
use warnings;

use Data::Dumper;
use XML::Simple;

my $xml = new XML::Simple;
my $data = $xml->XMLin('cmdb_coh.xml');
print Dumper( $data );
[download]