let
with_redirections cmd l =
Redirect_output
(cmd, l)