interactWith function inputFile outputFile = do
    input <- readFile inputFile
    writeFile outputFile (function input)
interactWith function inputFile outputFile = do
    input <- readFile inputFile
    writeFile outputFile (function input)
interactWith function inputFile outputFile = do
    input <- readFile inputFile
    writeFile outputFile (function input)