Clojureに入門する(4)

Clojureに入門したのは良いけどコードをまったく載せていなかったため、何かコードを書きます。

以下のサイトでCSVファイルを扱う例があったので、ためしたコードを載せます。

fscoward.hateblo.jp

記載者様と同様に clojure-csv というライブラリを使わせていただきました。

[clojure-csv/clojure-csv "2.0.1"]

ファイルからCSVデータを持ってくるのが面倒だったため、defしてます。

(ns parse-csv-example.core
  (:require [clojure-csv.core :refer [parse-csv]]))

(def keys "000,111")
(def vals "aaa,bbb")

(let [key-seq (flatten (parse-csv keys))
      val-seq (flatten (parse-csv vals))]
  (map #(str %1 " : " %2) key-seq val-seq))
;;=> ("000 : aaa" "111 : bbb")

最初flattenに気づかず記事を投稿された方と同じ結果になってしまいましたorz。