my @files = grep { /^onlythese.*\.txt$/ } readdir DIR;