Select Code to Download

my @files;

foreach my $dir (@dirs) {
     @files = glob "*.eap";
     ...

for my $dir (@dirs) {
    my @files = glob "$dir/*.eap";
    ...

for (@files) { ...

for my $file (@files) { ...