sS negateRegexp(S re) {
  ret "^" + regexpNegativeLookahead(".*?" + re);
}