sepBy package:attoparsec

sepBy :: Alternative f => f a -> f s -> f [a]
attoparsec Data.Attoparsec.ByteString Data.Attoparsec.ByteString.Char8 Data.Attoparsec.ByteString.Lazy Data.Attoparsec.Combinator Data.Attoparsec.Text Data.Attoparsec.Text.Lazy
sepBy p sep applies zero or more occurrences of p, separated by sep. Returns a list of the values returned by p. 
commaSep p  = p `sepBy` (char ',')
sepBy' :: MonadPlus m => m a -> m s -> m [a]
attoparsec Data.Attoparsec.ByteString Data.Attoparsec.ByteString.Char8 Data.Attoparsec.ByteString.Lazy Data.Attoparsec.Combinator Data.Attoparsec.Text Data.Attoparsec.Text.Lazy
sepBy' p sep applies zero or more occurrences of p, separated by sep. Returns a list of the values returned by p. The value returned by p is forced to WHNF. 
commaSep p  = p `sepBy'` (char ',')
sepBy1 :: Alternative f => f a -> f s -> f [a]
attoparsec Data.Attoparsec.ByteString Data.Attoparsec.ByteString.Char8 Data.Attoparsec.ByteString.Lazy Data.Attoparsec.Combinator Data.Attoparsec.Text Data.Attoparsec.Text.Lazy
sepBy1 p sep applies one or more occurrences of p, separated by sep. Returns a list of the values returned by p. 
commaSep p  = p `sepBy1` (char ',')
sepBy1' :: MonadPlus m => m a -> m s -> m [a]
attoparsec Data.Attoparsec.ByteString Data.Attoparsec.ByteString.Char8 Data.Attoparsec.ByteString.Lazy Data.Attoparsec.Combinator Data.Attoparsec.Text Data.Attoparsec.Text.Lazy
sepBy1' p sep applies one or more occurrences of p, separated by sep. Returns a list of the values returned by p. The value returned by p is forced to WHNF. 
commaSep p  = p `sepBy1'` (char ',')