Skip to content

Instantly share code, notes, and snippets.

@curtiswilkinson
Last active December 31, 2017 04:39
Show Gist options
  • Save curtiswilkinson/07780ec294dc9ccd670711de7d3e61e1 to your computer and use it in GitHub Desktop.
Save curtiswilkinson/07780ec294dc9ccd670711de7d3e61e1 to your computer and use it in GitHub Desktop.
Together, with feeling
module Main where
import System.IO
main :: IO ()
main = do
putStrLn "What would you like to call your file?"
filename <- getLine
putStrLn "What would you like inside your file?"
content <- getLine
writeFile filename content
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment