OCaml에서 URL의 HTML 내용 읽기

Question

URL을 취하여 그 위치에서 HTML 파일의 내용으로 구성된 문자열을 반환하는 OCaml 함수를 작성하고 싶습니다. 어떤 아이디어?

고맙습니다.

최고, Surikator.

Answer 1

나는 URL의 내용을 읽을 수 ocurl 및 nethtml

ocurl를 사용하는 일 모두 완료했습니다 (여기 특성의 톤을, 이것은 최소한),

let string_of_uri uri = 
    try let connection = Curl.init() and write_buff = Buffer.create 1763 in 
     Curl.set_writefunction connection 
       (fun x -> Buffer.add_string write_buff x; String.length x); 
     Curl.set_url connection uri; 
     Curl.perform connection; 
     Curl.global_cleanup(); 
     Buffer.contents write_buff; 
    with _ -> raise (IO_ERROR uri) 

및 nethtml에서을 ;

let parse_html_string uri = 
    let ch = new Netchannels.input_string (string_of_uri uri) in 
    let docs = Nethtml.parse ?return_pis:(Some false) ch in 
    ch # close_in(); 
    docs 

건배를 (당신은 Nethtml.parse에 대한 DTD를 설정해야 할 수도 있습니다)!