use strict;
use warnings;
use autodie;

use XML::Simple;

local $XML::Simple::PREFERRED_PARSER = 'XML::Parser';

open my $fh, '<:encoding(UTF-8)', $file;

$xml->XMLin(
    $fh,
    ForceArray => ['map'],
    KeyAttr    => {},
);