last if ++$files >= $N while readdir DIR;