$tries = 0;
while($tries < 10 && !rmdir($root))
 {
   select(undef, undef, undef, 0.05);
   $tries++;
 }
if($tries < 10)
 {
   ++$count;
 }
else
 {
   #unable to rmdir
 }