@dir = grep { -d "./desktop/$_" } readdir(TEXTFILES);