use DBI;
$db = DBI->connect("dbi:ODBC:$DSN");
$insert = $db->prepare('INSERT INTO Addresses ("Email Address", "Website Title") VALUES (?, ?)')
 or die "The INSERT statement is wrong: ".$db->errstr()."\n";

while (...) { 
 ...
 $insert->execute($email, $titlePage)
  or die "Failed to insert the email $email : ".$db->errstr."\n";
}