計算機科学のブログ

HaskellのI/O ファイルの操作 大文字化、Data.Text.IOモジュール、readFile関数、writeFile関数

入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)のUNIT4(HaskellのI/O)、LESSON24(ファイルの操作)、24.6(練習問題)Q24-2の解答を求めてみる。

コード

import qualified Data.Text as T
import qualified Data.Text.IO as TIO
import System.Environment (getArgs)

main :: IO ()
main = do
  args <- getArgs
  let fname = head args
  contents <- TIO.readFile fname
  let capitalized = T.toUpper contents
  TIO.writeFile fname capitalized

入出力結果(Terminal, Zsh)

% cat hello.txt 
Hello world!
Good bye world!%                                                                % runghc capitalize.hs hello.txt 
% cat hello.txt 
HELLO WORLD!
GOOD BYE WORLD!%                                                                %