(publish :path "/hello-count" :content-type "text/html" :function (let ((count 0)) #'(lambda (req ent) (with-http-response (req ent) (with-http-body (req ent) (html (:html (:head (:title "Hello Counter")) (:body ((:font :color (nth (random 5) '("red" "blue" "green" "purple" "black"))) "Hello World had been called " (:princ (incf count)) " times")))))))))
| Game | Time | WPM | Accuracy |
|---|---|---|---|
| 6 | 2012-03-13 14:30:16 | 24.34 | 87% |
| 5 | 2012-03-13 13:56:33 | 23.35 | 91% |