@files = map { "$fs/$_" }
         grep { -f "$fs/$_" and /^\.*/ } readdir(DIR);