从字符串中删除空格

Question

我想删除位于\n之后的空白。

例如，username 123\n ugas 423\n peter 23\n asd234将成为username 123\nugas 423\npeter 23\nasd234。

Answer 1

我假设您要删除一个或多个空格字符 每行的开头，而不仅仅是第一个空白字符。 此外，我认为你想删除任何类型的空白字符，如标签， 不只是文字空间字符。

import Data.Char

stripLeadingWhitespace :: String -> String
stripLeadingWhitespace = unlines . map (dropWhile isSpace) . lines

Answer 2

f [] = []
f ('\n':' ':a) = f ('\n' : a)
f (a:b) = a : f b