while(-e "$time_$$_$counter") { $counter++; }
  open(F, ">$time_$$_$counter");