my @files;

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