!7

static JTextArea ta;

p-substance {
  ta = showText("");
  onChangeAndNow(ta, r {
    print("First word: " + firstWord(getText(ta)));
  });
}

sS firstWord(S s) {
  if (empty(s)) ret "";
  if (isLetterOrDigit(first(s)))
    ret takeCharsWhile(s, f isLetterOrDigit);
  else ret "" + first(s);
}