Fixed loads of bugs. It now works. Ready to integrate in assessortool.
[perl4caml.git] / examples / loadpage.ml
index d73bf9c..9f67907 100644 (file)
@@ -1,7 +1,7 @@
 (* Example program which uses LWP::UserAgent and HTML::TreeBuilder to
  * download an HTTP page and parse it.
  * Copyright (C) 2003 Merjis Ltd.
- * $Id: loadpage.ml,v 1.1 2003-10-12 17:33:14 rich Exp $
+ * $Id: loadpage.ml,v 1.2 2003-10-14 16:05:21 rich Exp $
  *)
 
 open Printf
@@ -14,7 +14,7 @@ open Pl_HTML_Element
 let () =
   (* This is a hack which shouldn't be needed in future. *)
   Perl.eval "use LWP::UserAgent";
-  Perl.eval "use Net::HTTP";
+  Perl.eval "use HTML::TreeBuilder";
 
   let site =
     if Array.length Sys.argv >= 2 then