Usando mapM ao invés de unlines