21/10/22 21:20:57.92 .net
UTF-8 のHaskell ソースコードに書き込んだ日本語文字列を通信先に渡す為に Shift_JIS の String にしたいのですが
module Main where
import Data.Text.ICU.Convert as ICU
import Data.Text as T
import Data.ByteString.Char8 as BS
main :: IO ()
main = do
conv <- open "Shift_JIS" Nothing
let
utf8txt = T.pack "皆は、赤ちゃんしゅきぃ？"
sjis_bs = fromUnicode conv utf8txt
この sjis_bs をどうしたら Shift_JIS の String になるんですか？
BS.unpack だと
ﾂ皆ﾂづ債、ﾂ静板つｿﾂづ｡ﾂづｱﾂつｵﾂづ｣ﾂつｫﾂつ｡ﾂ？
になってしまいます