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))))
|
|
|