13

言語処理100本ノック 2015

13. col1.txtとcol2.txtをマージ
12で作ったcol1.txtとcol2.txtを結合し，元のファイルの1列目と2列目をタブ区切りで並べたテキストファイルを作成せよ．確認にはpasteコマンドを用いよ．

pasteコマンドなかったため未実施。たぶん下記の通り。

>paste col1.txt col2.txt

13.hs

import System.Environment
import System.IO.UTF8 as I8
import Data.List

main = do
  files <- getArgs
  body <- mapM (\x -> I8.readFile x >>= return . lines) files
  I8.writeFile "out.txt" $ unlines $ map unwords $ transpose body

実行は省略。文字列の出力処理に悩む。