docker control in haskell