Network.Mail.Mime を使えば UTF-8 ですごく簡単にメール送信ができる。sendmail コマンドが呼び出せることが前提。 {-# LANGUAGE OverloadedStrings #-} import Network.Mail.Mime main :: IO () main = renderSendMail $ simpleMail' (Address Nothing "to@example.com") (Address Nothing "from@example.com") "件名" "本文"