Haskell:
编写文本文件

如何操作：

Haskell 的标准 Prelude 通过 System.IO 模块中的 writeFile 和 appendFile 函数提供了写入文件的基本支持。下面是一个创建新文件（或覆盖现有文件）然后将文本附加到文件的基本示例。

import System.IO

-- 写入文件，如果文件存在则覆盖
main :: IO ()
main = do
  writeFile "example.txt" "这是第一行。\n"
  appendFile "example.txt" "这是第二行。\n"

当你运行这个程序时，它会创建（或清空）example.txt 并写入“这是第一行。”接着是“这是第二行。”在下一行。

对于更高级的文件处理，Haskell 程序员通常转向 text 包进行高效的字符串处理，以及 bytestring 包处理二进制数据。以下是如何使用 text 包进行文件 IO 的方法：

首先，你需要将 text 添加到项目的依赖中。然后，你可以按如下方式使用它：

import qualified Data.Text as T
import qualified Data.Text.IO as TIO

-- 使用 text 包写入文件
main :: IO ()
main = do
  let content = T.pack "使用 text 包以获得更好的性能。\n"
  TIO.writeFile "textExample.txt" content
  TIO.appendFile "textExample.txt" $ T.pack "追加第二行。\n"

在这个代码片段中，T.pack 将常规的 String 转换为更高效的 Text 类型。TIO.writeFile 和 TIO.appendFile 是用于写入和追加文件的 text 等效函数。

运行这段代码将会生成一个名为 textExample.txt 的文件，其中包含两行文本，演示了使用高级 text 库进行创建和追加的能力，以获得更好的性能和处理 Unicode 文本的能力。