- let sth = dbh#prepare_cached "insert into mailing_lists (hostid, email, name,
- pending, opt_out) values (?, ?, ?, ?, ?)" in
- sth#execute [Some hostid; Some email; Some name;
- Some pending; Some opt_out];
+ PGSQL(dbh) "insert into mailing_lists (hostid, email, name,
+ pending, opt_out)
+ values ($hostid, $email, $name, $pending, $opt_out)";