!7

p {
  set NanoHTTPD_debug;
  NanoHTTPD.LOG.setLevel(Level.FINEST);
  serveHttps(8443, serverSocketFactory_botCompanyEtc());
}

sS demoText() {
  ret lines(mapI(countIterator(1000), i -> "Line " + (i+1)));
}

html {
  if (eq(uri, "/submit")) {
    S text = params.get("text");
    ret "Data received (" + nChars(text) + ")";
  }
  
  ret hpostform(
    p(htextarea(demoText(), name := "text", rows := 10, cols := 40))
    + p(hsubmit()),
    action := "submit");
}