A sample of Clojure and lucene-gosen

gistfile1.clj

(ns lucene_gosen_test.core (:gen-class))
(import java.util.Collections)
(defn -main [& args]
  (println (first args))
  (with-open [reader (new java.io.StringReader (first args))]
    (let [
          analyzer (new org.apache.lucene.analysis.ja.JapaneseAnalyzer org.apache.lucene.util.Version/LUCENE_35 Collections/EMPTY_SET Collections/EMPTY_SET Collections/EMPTY_SET "/home/haruyama/work/solr/dic/solr/conf/dic")
          ts (.tokenStream analyzer "dummy" reader)
          termAtt (.getAttribute ts org.apache.lucene.analysis.tokenattributes.CharTermAttribute)
          posAtt (.getAttribute ts org.apache.lucene.analysis.ja.tokenAttributes.PartOfSpeechAttribute)
          ]
      (while (.incrementToken ts)
        (println (.toString termAtt))
        (println (.getPartOfSpeech posAtt))
        )
      )
    )
  )