sS firstWord2(S s) {
  s = xltrim(s);
  if (empty(s)) ret "";
  if (isLetterOrDigit(first(s)))
    ret takeCharsWhile isLetterOrDigit(s);
  else ret "" + first(s);
}