foreach my $dir (@directories) { foreach my $file (@filenames) { $age = -M "$dir/$file"; # see the difference? ....