(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 |
|---|---|---|---|
| 9 | 2011-07-25 22:51:01 | 62.86 | 96% |
| 2 | 2011-07-25 22:42:34 | 53.01 | 93% |