[Haskell] listの要素を出力する

listの要素のそれぞれになんか関数を適用した結果のlistを返すには、mapを使います。

ary = [1, 2, 3]

func1 x = 2 * x

map func1 ary -- -> [2, 4, 6]

では、一般に、listの要素を順番に出力したい場合はどうすれば良いのでしょうか。
例えば、

output x = putStr (show x ++ "\n")

がある場合に、listの一つ一つの要素に outputを適用させたい場合です。
発想を変えて、出力したい最終形の文字列を生成してからputStrを使う次の形式

outputstr x = show x 

putStr $ unlines $ map outputstr ary

にするか再帰を使うしかないのでしょうか。