Haskell program that sends traffic through SSH tunnels on-demand