@DirList = grep {
 -f "$some_directory/$_/foo/bar.txt"
} readdir DIR;