從標準輸入讀取一行

main = do
    line <- getLine
    putStrLn line

輸入:

This is an example.

輸出:

This is an example.