(define-easy-handler (main :uri "/") ()
  (with-html-output-to-string (str nil :prologue t :indent t)
    ... write-my-code
    (make-select-form)))