mtnygard

(defn response
  ([status body]
   {:status  status
    :headers {}
    :body    body}))

(defmacro http-status [code sym]
  `(def ~sym (partial response ~code)))

(defmacro http-statuses [& pairs]

yogthos

Introductory resources

• High level overview https://yogthos.github.io/ClojureDistilled.html
• An Animated Introduction to Clojure https://markm208.github.io/cljbook/
• Interactive tutorial in a browser https://tryclojure.org/
• Interactive exercises http://clojurescriptkoans.com/
• Clerk notebooks with introductory examples https://github.clerk.garden/anthonygalea/notes-on-clojure
• More interactive exercises https://4clojure.oxal.org/
• Lambda Island tutorials https://lambdaisland.com/
• Functional Programming with Clojure resources https://practicalli.github.io/

trvswgnr

#!/bin/sh

print_usage() {
    echo "usage: compress_video <input_file>"
    echo "supported formats: mp4, webm, mkv, mov, avi, flv"
}

get_extension() {
    f="${1##*/}"
    case "$f" in