Haskell将字符串列表转换为带分隔符的字符串“|”

Question

如何使用foldl'将列表转换为带分隔符“|”的字符串？

ltos :: String -> [String] -> String 
ltos [] = "" 
ltos (m:n) = foldl' f acc xs 
    where 
    f a b   = 
    acc   = 
    xs    = 

例如，

ltos ["a", "b", "c"] 

将输出

"a|b|c" 

Answer 1

这是模式匹配和HOF的可爱组合。

ltos :: [String] -> String 
ltos [] = "" 
ltos (m:n) = foldl' (\a b -> a ++ "|" ++ b) m n 

可以使用列表作为起始串的第一元件，然后折叠在剩余的元素（添加它们中的每之间|）。

（我假设你错误签署了ltos）。

Answer 2

这里有一个办法：

foldl' (\acc x -> if (null acc) then acC++ x else acC++ "|" ++ x) [] ["a", "b", "c"] 

第一次累加器是空的，所以只是追加了第一个字符串从列表中。之后，在变量前追加分隔符。如果您运行scanl，你可以看到字符串正在修建如下：

["","a","a|b","a|b|c"]