-(* Wrapper around Perl Net::Google class.
- * Copyright (C) 2003 Merjis Ltd.
- * $Id: pl_Net_Google.ml,v 1.1 2003-10-14 16:05:22 rich Exp $
- *)
+(** Wrapper around Perl [Net::Google] class.
+ *
+ * Copyright (C) 2003 Merjis Ltd.
+ *
+ * $Id: pl_Net_Google.ml,v 1.3 2003-10-16 13:41:07 rich Exp $
+ *)
open Perl
open Pl_Net_Google_Search
open Pl_Net_Google_Spelling
+let _ = eval "use Net::Google"
+
let may f = function None -> () | Some v -> f v
class net_google sv =