while (1)
  do_pattern($re);
  if ($seen_qu_semi) { last }
}