Haskell：将字符串转换为 [(String,Double)]

Question

我解析一个 XML 并得到一个这样的字符串：

"resourceA,3-resourceB,1-,...,resourceN,x"

我想将该字符串映射到元组列表 (String,Double) 中，如下所示：

[(resourceA,3),(resourceB,1),...,(resourceN,x)]

怎么可能做到这一点？我查看了地图功能以及拆分功能。我可以用“-”分割字符串，但除此之外……

这是我目前的代码：

split :: Eq a => a -> [a] -> [[a]]
split d [] = []
split d s = x : split d (drop 1 y) where (x,y) = span (/= d) s

这只是一个将我的字符串拆分成一个Stirng列表的函数，但是我不知道如何继续。 我想知道的是循环遍历我使用 split 方法创建的新列表，并为每个元素创建一个元组。我已经尝试过使用 map 函数，但我什至无法编译它

Answer 1

因此，在 Haskell 中，您不会真正改变任何值，而是根据您描述的字符串创建一个新的对列表，因此解决方案类似于以下内容：

import Data.List.Split


xmlList = splitOn "-" "resourceA,3-resourceB,4-resourceC,6"

commaSplit :: String -> [String]
commaSplit = splitOn ","

xmlPair :: [String] -> [(String, Double)] -- might be more efficient to use Text instead of String
xmlPair [x]    = [(\x' -> ((head x') :: String, (read (last x')) :: Double )) (commaSplit x)]
xmlPair (x:xs) = xmlPair [x] ++ xmlPair xs

main :: IO ()
main = mapM_ (\(a,b) -> putStrLn (show a++" = "++ show b)) (xmlPair $ xmlList)

这是我快速而肮脏的展示方式，但我相信总有人可以添加更详细的答案。