idiomatyczny_import.clj

; Definicja przestrzeni nazw z importem funkcji Clojura i klas Javy

(ns qertoip
  (:use
    [clojure.contrib.io :only [to-byte-array]]
    [clojure.contrib.java-utils :only [as-file]])
  (:import
    [java.io File FileOutputStream]))

; W poniższy sposób można zaimportować *.clj lub *.class wymienione z nazwy, 
; znajdujące się w CLASSPATH. Nie można zaimportować całego pakietu.

(use '[lib-name :only (var-names+)])

list_comprehension.clj

; odpowiednik w ruby:
; compositions.select{|c| c.name == "Requiem" }.map( &:composer )

(for [c compositions :when (= "Requiem" (:name c))] (:composer c))

metody_javy.clj

; Jak wołać metody obiektu?

(.metodaObiektu obiekt)

obiekty_javy.clj

; Jak utworzyć obiekt Javy?

(new Thread 
  (fn [] ())
)

odpowiednik_klasy.clj

; W clojure nie ma klas znanych z programowania obiektowego.
; Najbliższym odpowiednikiem jest struktura z polami, coś jak struct w C.

(defstruct person :first-name :last-name)

(struct person "Piotr" "Wlodarek")
; lub
(struct-map person :first-name "Piotr", :last-name "Wlodarek")

odpowiednik_switch_case.clj

; odpowiednik_switch_case.clj
; cond to macro, zwróci nil jeśli żaden z warunków nie był spełniony

(cond 
  (< x 10) "less"
  (> x 10) "more"
)

repl_load_file.clj

; Jak wczytać plik clj do REPL-a? Jeśli nie ma przestrzeni nazw, 
; wystarczy load lub load-file

(load-file "./temp.clj")  ; z zadanej ścieżki
(load "temp")             ; z CLASSPATH

statyczne_metody_javy.clj

; Jak idiomatycznie wołać statyczne metody Javy?

(Character/isWhitespace 32)

string_join.clj

(use '[clojure.contrib.str-utils :only (str-join)])

(str-join "-" ["ala" "ma" "kota"])

threadsafe_mutable_state.clj

(defstruct account :id :balance)

(def accounts
  (ref #{})
)

(dosync ; force transaction
  (alter accounts conj
    (struct account 1 139.78)
  )
)

Najbardziej praktyczne fragmenty kodu z początku książki "Programming Clojure"