Select Code to Download

@files = sort grep -f, map {opendir DIR, $_; readdir DIR} @dirlist;

map { opendir DIR, $_; readdir DIR <, closedir DIR }