在Haskell中如何实现一个简单的文件读写操作

在Haskell中，可以使用Data.Text.IO模块提供的函数来实现文件读写操作。以下是一个简单的文件读写操作的示例代码：

import qualified Data.Text.IO as TIO

-- 写入文本到文件
writeToFile :: FilePath -> String -> IO ()
writeToFile path content = TIO.writeFile path (T.pack content)

-- 读取文件内容
readFromFile :: FilePath -> IO String
readFromFile path = do
  content <- TIO.readFile path
  return (T.unpack content)

main :: IO ()
main = do
  let fileName = "example.txt"
  -- 写入文本到文件
  writeToFile fileName "Hello, world!"
  -- 读取文件内容
  fileContent <- readFromFile fileName
  putStrLn fileContent

上述代码中，writeToFile函数接受一个文件路径和要写入的文本内容，并将内容写入指定文件中。readFromFile函数接受一个文件路径，读取文件内容并返回字符串。在main函数中，我们首先调用writeToFile函数将内容写入文件example.txt中，然后调用readFromFile函数读取文件内容并输出。

需要注意的是，在使用这些函数之前，还需要在代码中导入Data.Text模块和Data.Text.IO模块，以及使用qualified import语法将Data.Text.IO模块重命名为TIO，以避免与标准库中的Prelude模块中的readFile和writeFile函数冲突。

运行上述代码，将在当前目录下创建一个名为example.txt的文件，并将内容写入其中，然后读取文件内容并输出到控制台。