先に改行付きの文字列にしてしまって、
それを出力する方法も。

strdump = putStr . unlines

-- unlines [ "abc", "def" ] = "abc\ndef\n"