Haskell - как сделать цикл, в котором есть getLine?

Question

Я хочу создать цикл, который будет принимать пользовательский ввод, то есть getLine, во время каждой итерации цикла. Возможно ли это в основном или с помощью функции getLine в передаче параметров или нет вообще? Я относительно новичок в Хаскеле, и я разбираюсь в большей части этого, но в этом я не уверен. Очевидно, что для выхода из него будет использовано сопоставление с образцом, но как я могу получить пользовательский ввод? Я пытался понять это сам, но каждый раз терпел неудачу. Заранее спасибо.

Answer 1

Вы должны использовать монаду IO для своих функций, для создания цикла вы можете просто сделать рекурсивный вызов , посмотрите этот пример:

-- This just wraps the getLine funtion but you could operate over the input before return the final result
processInput :: IO String
processInput = do
    line <- getLine
    return $ map toUpper line


-- This is our main loop, it handles when to exit
loop :: IO ()
loop = do
    line <- processInput
    putStrLn line
    case line of
        "quit"    -> return ()
        otherwise -> loop

-- main is the program entry point
main :: IO ()
main = do
    putStrLn "Welcome to the haskel input example"
    loop

Здесь у вас есть живой пример