1. Kota UENISHI
  2. tumblr-tools

Source

tumblr-tools / tumblr.ml


open Xml;;
(* open Http_client;;
 #require "netclient";; *)
open Http_client.Convenience;;

let get_and_print url =
  let s = http_get url in
  print_string s;
  flush stdout
;;

get_and_print "http://www.google.com";;