Select Code to Download

while ( <FILE> ) {

...
   print "SQL: $query\n";
   my $sth = $dbh->prepare( $query );
   $sth->execute;

SQL: SELECT r.owner, r.om, r.manager FROM r, n WHERE MATCH(r.owner, r.
+om, r.manager) AGAINST('+Miller's' IN BOOLEAN MODE) AND n.time LIKE '
+2009%' AND r.key = n.key
DBD::mysql::st execute failed: You have an error in your SQL syntax; c
+heck the manual that corresponds to your MySQL server version for the
+ right syntax to use near 's' IN BOOLEAN MODE) AND n.time LIKE '2009%
+' AND r.key = n.k' at line 1 at ./ssel.pl line 55, <FILE> line 57.
DBD::mysql::st bind_columns failed: Statement has no result columns to
+ bind (perhaps you need to successfully call execute first) at ./ssel
+.pl line 57, <FILE> line 57.
DBD::mysql::st fetch failed: fetch() without execute() at ./ssel.pl li
+ne 59, <FILE> line 57.