Select Code to Download

$file_url{file1.exe} = 'http://server.domain/file1.exe';
$file_url{file2.zip} = 'http://server.domain/file2.zip';

use warnings;
use strict;
;
...
my $ref = XMLin($xml, forcearray => [ qw(files) ], keyattr => [] );

print Dumper($ref);