(use cgi-protocol )

(define (action request)
  (DocumentResponse 
   `((Content-type . "text/plain;charset=us-ascii"))
   '("Hello, world!")
   ))

(print (run-action action '()))