getLine >>= putStrLn じゃなくて interact はダメなん?