inferSeparator :: String -> Char
inferSeparator csvData = snd $ maximum freqs
    where
        count c = length $ filter (==c) csvData
        freqs = zip (map count separators) separators

-- a cell can be a number or anything else
inferSeparator :: String -> Char
inferSeparator csvData = snd $ maximum freqs
    where
        count c = length $ filter (==c) csvData
        freqs = zip (map count separators) separators

-- a cell can be a number or anything else
inferSeparator csvData = snd $ maximum freqs
    where
        count c = length $ filter (==c) csvData
        freqs = zip (map count separators) separators

-- a cell can be a number or anything else