import Control.Monad (forM_) import Data.List.Split (splitOn) import Data.List (transpose) import System.IO main :: IO () main = do withFile "file.file" ReadMode $ \handle -> contents <- hGetContents handle let clines = lines contents ccols = transpose (map (splitOn ",") lines) forM_ (ccols !! 3) $ \cell -> do putStrLn cell
http://hackage.haskell.org/package/split http://hackage.haskell.org/package/mysql-simple http://hackage.haskell.org/package/sqlite-simple
import Control.Monad (forM_) import Data.List.Split (splitOn) import Data.List (transpose) import System.IO main :: IO () main = do withFile "tel.csv" ReadMode $ \handle -> do contents <- hGetContents handle let clines = lines contents ccols = transpose (map (splitOn ",") clines) forM_ (ccols !! 3) $ \cell -> do putStrLn cell