$ perl -Mstrict -Mwarnings -E '
    use XML::Simple qw{:strict};

    my $xml = <<EOX;
<?xml version="1.0" encoding="UTF-8"?>
<config>
    <item>
        <id>0</id>
        <filename>AMEX</filename>
        <destination_dir>test</destination_dir>
    </item>
    <item>
        <id>1</id>
        <filename>bla</filename>
        <destination_dir>test1</destination_dir>
    </item>
    <item>
        <id>2</id>
        <filename>alb</filename>
        <destination_dir>test2</destination_dir>
    </item> 
</config>
EOX
    
    my $config = XMLin($xml => KeyAttr => {item=>"filename"}, ForceArray => ["item"]);

    say "*** bla destination ***";
    say $config->{item}{bla}{destination_dir};

    say "*** all destinations ***";
    for (keys %{$config->{item}}) {
        say "$_: ", $config->{item}{$_}{destination_dir};
    }
'
*** bla destination ***
test1
*** all destinations ***
alb: test2
AMEX: test
bla: test1