title: Call multiple IO functions on the same input
body: <p>Suppose I have a list of tuples (e.g. <code>[(a,b)]</code>) each a result of some previous computation.</p>
  
  <p>And I want several functions to be applied on each of these elements (e.g one function might print it another send it over the network etc.)</p>
  
  <p>What I've tried:</p>
  
  <pre><code>import Control.Applicative
  main = do
            let a = [1..5]
            let fs = [(\k-&gt; putStrLn $ show $ k*2), (\k-&gt; putStrLn $ show $ k-2), (\k-&gt; putStrLn $ show $ k*10)]
            let res = fs &lt;*&gt; a 
            putStrLn $ "Yo"
  </code></pre>
  
  <p>prints just <code>"Yo"</code>.</p>