gistfile1.txt

object CsvParser3 extends RegexParsers {
  def eol = '\n'
  def cell = "\"" ~> "[^\"]*".r <~ "\""
  def row = repsep(cell, ",") <~ eol
  def headerRow = row ^^ { cells => new HeaderRow(cells) }
  def dataRow = ( rep( ("\"" ~> "[^\"]*".r <~ "\",") | ("[^,\n]*".r <~ ",") ) ~ ( ("\"" ~> "[^\"]*".r <~ "\"\n") | ("[^,\n]*".r <~ "\n") ) ) ^^ { cells => new DataRow(cells._1 ::: List(cells._2)) }
  def all = headerRow ~ rep(dataRow) ^^ { res => res._1 :: res._2 }
  def parse(input: String): ParseResult[List[Row]] = parseAll(all, input)
}