HaskellのI/O ファイルの操作 正格なIO、Text型、readFile関数、writeFile関数、コマンドライン引数、System.Environmentモジュール、getArgs関数、大文字で書き換える、toUpper関数
入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)のUNIT4(HaskellのI/O)、LESSON 24(ファイルの操作)、24.6(練習問題)Q24-2の解答を求めてみる。
コード
import System.Environment
import qualified Data.Text as T
import qualified Data.Text.IO as TI
main :: IO ()
main = do
args <- getArgs
let filePath = head args
input <- TI.readFile filePath
TI.writeFile filePath (T.toUpper input)
putStrLn "done!"
入出力結果(Terminal, Zsh)
% cat hello.txt
Hello world!
Good bye world!
% runghc capitalize.hs hello.txt
done!
% cat hello.txt
HELLO WORLD!
GOOD BYE WORLD!
%