BinRoot/punctuation.hs

Last active December 31, 2015 17:09

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/BinRoot/8018000.js"></script>
Save BinRoot/8018000 to your computer and use it in GitHub Desktop.

Download ZIP

Remove punctuation from a string

Raw

punctuation.hs

	clean :: String -> String
	clean = foldr (.) id $ map (flip replace "") ["!", "\"", "#", "$", "%", "(", ")", ".", ",", "?"]

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment