(* Insert into the database. *)
let sth = dbh#prepare_cached "insert into page_emails (hostid, url, email,
pending, opt_out) values (?, ?, ?, ?, ?)" in
(* Insert into the database. *)
let sth = dbh#prepare_cached "insert into page_emails (hostid, url, email,
pending, opt_out) values (?, ?, ?, ?, ?)" in