Clojure その１９ twitter4j を使ってみる３

むむむ・・・

(ns hello.core
  (:import [twitter4j TwitterFactory Query TwitterException]))

(defn -main []
  (try
    (let [twitter (.getInstance (TwitterFactory.))]
        (let [userTimeline (.getUserTimeline twitter)]
          (println (map #(.getText %) userTimeline))
          )
      )
    (catch TwitterException e (println (.getMessage e))))
  )

これじゃない

書き直し

(ns hello.core
  (:import [twitter4j TwitterFactory Query TwitterException]))

(defn -main []
  (try
    (let [twitter (.getInstance (TwitterFactory.))]
        (let [userTimeline (.getUserTimeline twitter)]
          (doall
            (map println (map #(.getText %) userTimeline))
           )
          )
      )
    (catch TwitterException e (println (.getMessage e))))
  )

これだ！！！

はー・・・書けたけど、理解できてない

難しい・・・

本読まなきゃダメか？

おいしいClojure入門 (Software Design plus)