@@ -237,11 +237,24 @@
 
         ;; Get the list of server logs.
 	(let* (
                ;; For some reason, when I uncomment the below line, ext-tests sometimes starts 1000's of servers.
                ;; (exiting-servers (system (conc "bash -c 'rm -f `grep -il exiting " areapath "/logs/server-*-*.log 2> /dev/null`'")))
-               (server-logs   (glob (conc areapath "/logs/server-*-*.log")))
+               (server-logs   
+                (handle-exceptions
+		   exn
+		   (begin
+		     (debug:print 0 *default-log-port* "server:get-list: glob failed , exn=" exn)
+                     (thread-sleep! 60)
+                     (system "lsof -c mtest > /tmp/$USER/glob-failed.$$.lsof")
+                     (debug:print 0 *default-log-port* "lsof output saved in /tmp/$USER/glob-failed.$$.lsof")
+                     (thread-sleep! 60)
+                     (glob (conc areapath "/logs/server-*-*.log"))
+		   )
+                   (glob (conc areapath "/logs/server-*-*.log"))
+                )
+               )
 	       (num-serv-logs (length server-logs)))
 	  (if (or (null? server-logs) (= num-serv-logs 0))
               (let ()
                  (debug:print 2  *default-log-port* "There are no servers running at " (common:human-time))
 	         '()