uzimith/remove_files.hs

Created December 23, 2014 03:26

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/uzimith/cfe2d69685201c7b7af5.js"></script>
Save uzimith/cfe2d69685201c7b7af5 to your computer and use it in GitHub Desktop.

Download ZIP

Raw

remove_files.hs

	import Control.Applicative
	import System.Directory

	main :: IO ()
	main = do
	files <- lines <$> getContents
	mapM_ removeFile files

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