If you know that it's always only one level deep, you can just as well use glob:

my @files = glob '*/*.{xyz,asd}';
[download]

See perlintro for help on the actual processing step.