## mark a section (Learn more)

-- InteractWith.hs -- From Real World Haskell Chapter 04 import System.Environment (getArgs) interactWith function inputFile outputFile = do input <- readFile inputFile writeFile outputFile (function input) main = mainWith myFunction where mainWith function = do args <- getArgs case args of [input,output] -> interactWith function input output _ -> putStrLn "error: exactly two arguments needed" -- replace 'id' with the name of our function below myFunction = id

This paste will be private.