使用自定义语法显示 Haskell 元组列表

Question

我有一个元组列表 [(1,'a','%',"yes"),(2,'b','[',"no"),(3,'c',' ]',"好的")]。 如何将此列表显示为 [(1,a,%,yes),(2,b,[,no),(3,c,],ok)] 形式的输出？

Answer 1

看起来您想要进行的转换是去掉引号字符？如果是这样，过滤对数据调用 show 的结果就足够了：

 > let x = [(1,'a','%',"yes"),(2,'b','[',"no"),(3,'c',']',"ok")]

然后应用一个过滤器，

 > putStrLn . filter (`notElem` "'\"") . show $ x
 [(1,a,%,yes),(2,b,[,no),(3,c,],ok)]

一旦您知道 show 将数据结构转换为漂亮的字符串，处理对该字符串进行细微修改非常容易。