HaskellのI/O テキストとUnicodeの操作 String型をText型に書き換える、言語拡張、OverloadedStrings、入出力、Data.Textモジュール、Data.Text.IOモジュール、getLine関数、putStrLn関数

入門Haskellプログラミング
 楽天ブックス
Yahoo!ショッピング
au PAY マーケット

開発環境

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

コード

{-# LANGUAGE OverloadedStrings #-}
import qualified Data.Text as T
import qualified Data.Text.IO as IO

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

main :: IO ()
main = do
    IO.putStrLn "Hello! What's your name?"
    name <- IO.getLine 
    let statement = helloPerson name
    IO.putStrLn statement

入出力結果(Terminal, Zsh)

% runghc sample1.hs 
Hello! What's your name?
Haskell
Hello Haskell!
% runghc sample1.hs
Hello! What's your name?
日本語
Hello 日本語!
%