A sample using Clojure and Solrj

gistfile1.clj

(ns solr_test.core (:gen-class))

(defn -main [& args]
  (let [server (new org.apache.solr.client.solrj.impl.CommonsHttpSolrServer "http://XXXX/")
        query (.setRows (new org.apache.solr.client.solrj.SolrQuery "*:*") (Integer. 3))
        response (.query server query)
        docs (.getResults response)
        ]
    (println (.getNumFound docs))
    (println (map (fn [d]
                    [ (.getFieldValue d "id")
                     (.substring (.getFieldValue d "text") 0 80)]
                    )
                  docs
                  )
             )
    (println "done.")
    )
  )