Haskell : words, unwords delimiter

Question

Is there any way I can provide a delimiter to words and unwords in haskell, to make it similar to split and join in python?

Answer 1

Please also have a look at the genial package split. It provides a module Data.List.Split for all sort of splitting.

Answer 2

No, but they're really just (optimized versions of) applications of Data.List.break and Data.List.intersperse, respectively.

pythonicSplit      :: String -> Char -> [String]
pythonicSplit "" _ =  []
pythonicSplit s  c =  let (r,rs) = break (== c) s
                       in r : pythonicSplit rs c

pythonicJoin       :: [String] -> Char -> String
pythonicJoin  ss c =  intersperse c ss -- or: flip intersperse