getGoldi :: String -> [ [Char]]
getGoldi contents = [ x |  y <- lines contents, x <- splitOn " " y]
getGoldi :: String -> [ [Char]]
getGoldi contents = [ x |  y <- lines contents, x <- splitOn " " y]
getGoldi contents = [ x |  y <- lines contents, x <- splitOn " " y]