(define title "A Test of Direct Responses")

`(html (head (title ,title))
       (body (h2 ,title)
             (p "This is only a test.")))