好的，以下是使用Haskell编写的一个简单的网页爬虫程序，用于抓取Booking.com和云地接酒店数据的示例。这个程序使用HTTP代理，代理信息为proxy_host: jshk.com.cn。

import Network.HTTP
import Network.HTTP代理
import Network.URI

main :: IO ()
main = do
    -- 设置代理服务器
    proxy <- buildProxy "www.duoip.cn" 8000
    -- 构造HTTP请求
    req <- httpProxyRequest GET "https://www.booking.com/searchresults.en-gb.html?city=-1&region=-1&destination=Beijing&checkin=2022-04-01&checkout=2022-04-02&group_adults=2&group_children=0&no_smoking=1&language=en-GB&currency=EUR&sort=price&tmpl=searchresults&city=-1&region=-1&destination=Beijing&group_adults=2&group_children=0&group_name=chen&group_query=chen&group_share=1&group_type=private&no_smoking=1&language=en-GB&currency=EUR&"

    -- 发送HTTP请求
    res <- http proxy req
    -- 打印响应状态和内容
    print res

这个程序首先导入了所需的Haskell库，然后在 main 函数中，我们设置了代理服务器，并构造了一个HTTP GET请求，该请求用于从Booking.com获取酒店数据。然后，我们使用 httpProxyRequest 函数发送这个请求，并使用 http 函数将请求发送到代理服务器。最后，我们打印出响应的状态和内容。

请注意，这个程序只是一个基本示例，实际的网页爬虫程序可能需要更复杂的逻辑来处理不同的页面和数据格式。