18 lines
380 B
Clojure
18 lines
380 B
Clojure
|
(ns csv2edn.core
|
||
|
(:require [clojure.java.io :as io]
|
||
|
[clojure-csv.core :as csv]
|
||
|
[semantic-csv.core :as sc]
|
||
|
[clojure.pprint :refer [pprint]])
|
||
|
(:gen-class))
|
||
|
|
||
|
(defn -main
|
||
|
([]
|
||
|
(-main "/dev/stdin"))
|
||
|
([csv-file & args]
|
||
|
(->> (io/reader csv-file)
|
||
|
(csv/parse-csv)
|
||
|
(sc/mappify {:keyify false})
|
||
|
(into [])
|
||
|
(pprint))))
|
||
|
|