@files = grep(!/^\./, readdir(DIR));