davegolland

(defn subs-to
  "Like subs, but does not throw if index is out of range"
  ([s start]
     (subs-to s start (count s)))
  ([s start end]
     (if (or (<= (count s) start) (<= end start))
       ""
       (subs s start (min (count s) end)))))

davegolland

(->> [1 2 3 4 5]   ; the initial vector
     (filter odd?) ; after this step we have: (1 3 5)
     (take 2)      ; (1 3)
     last          ; 3
     inc)          ; 4

davegolland

(inc (last (take 2 (filter odd? [1 2 3 4 5]))))

davegolland

(defmacro ->>
  ([x form] (if (seq? form)
              (with-meta `(~(first form) ~@(next form)  ~x) (meta form))
              (list form x)))
  ([x form & more] `(->> (->> ~x ~form) ~@more)))

davegolland

I did a lot of my initial learning with https://www.4clojure.com/problems

The Joy of Clojure book is a great reference.

A nice basic tutorial on how to use common macros:
http://cjohansen.no/clojure-to-die-for

I still spend a lot of time on:
http://clojuredocs.org/quickref/Clojure%20Core to get an overview of
the functions that exist and examples using them.

davegolland

{;; HTTP-related info
 :path "/entries/"
 :method :post

 :description
   "Add a new entry to the guestbook"

 ;; information about the HTTP request that the handler expects
 :request
  {:body Entry