I don't know if anyone mentioned this or I am off base, but the line:

$dbh->{'col_names' => ["timestamp", "email", "name", "address", "city"
+, "state", "zip"]};
[download]

Maybe should be:

 $dbh->{'col_names'} = ["timestamp", "email", "name", "address", "city
+", "state", "zip"];
[download]

I have never used csv in DBI before but the book says that $dbh{'col_names'} is array. You have a hash style pointer ( => ) with array style brackets ( ).

At the very least, my change causes perl -c to come back ok.

---

I admit it, I am Paco.