我希望去掉
例如,
\n
后面的空格。例如,
username 123\n ugas 423\n peter 23\n asd234
将变成 username 123\nugas 423\npeter 23\nasd234
。\n
后面的空格。username 123\n ugas 423\n peter 23\n asd234
将变成 username 123\nugas 423\npeter 23\nasd234
。我假设你想要删除每行开头的一个或多个空白字符,而不仅仅是第一个空白字符。此外,我认为你想要删除任何类型的空白字符,比如制表符,而不仅仅是字面上的空格字符。
import Data.Char
stripLeadingWhitespace :: String -> String
stripLeadingWhitespace = unlines . map (dropWhile isSpace) . lines
f [] = []
f ('\n':' ':a) = f ('\n' : a)
f (a:b) = a : f b
f ('\n':' ':a) = f ('\n':a)
- Vineet