Use more meaningful names for HTTP status codes.
Convert to Web.Scotty
Add & and <&> from Control.Lens.Combinators
Reverse computation of charset, for clarity.
Remove unused functions.