diff --git a/tests/runtests.pl b/tests/runtests.pl
index 1c40d31b0..b0bddba1c 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -2716,7 +2716,7 @@ sub cleardir {
     opendir(DIR, $dir) ||
         return 0; # can't open dir
     while($file = readdir(DIR)) {
-        if(($file !~ /^\./)) {
+        if(($file !~ /^\.(|\.)$/)) {
             unlink("$dir/$file");
             $count++;
         }