計算機科学のブログ

HaskellのI/O - テキストとUnicodeの操作 - Data.Text, Data.Text.IO

入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)の UNIT4(HaskellのI/O)、LESSON 23(テキストとUnicodeの操作)、23.6(練習問題)、Q23-1の解答を求めてみる。

コード

hello_world.hs

{-# LANGUAGE OverloadedStrings #-}
import qualified Data.Text as T
import qualified Data.Text.IO as TIO 
main ::IO ()
main = do
    TIO.putStrLn "Hello! What's your name?"
    name <- TIO.getLine
    let statement = helloPerson name
    TIO.putStrLn statement

helloPerson :: T.Text -> T.Text
helloPerson name = mconcat ["Hello ", name, "!"]

入出力結果(Terminal, Zsh)

% runghc hello_world.hs 
Hello! What's your name?
Will Kurt
Hello Will Kurt!
%