Select Code to Download

use DBIx::Simple;
use SQL::Abstract;

my $q = "INSERT INTO history (`Symbol`,`Company_Name`,`Last_Price`,...
+...,`Mktcap`) VALUES (?,?,?,STR_TO_DATE(?,\'%m/%d/%Y'),TIME(?),?,?,?,
+?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?
+)";

DBD::mysql::st execute failed: Column count doesn't match value count 
+at row 1 at rtd.pl line 62.

DBD::mysql::st execute failed: called with 29 bind variables when 43 a
+re needed at rtd.pl line 65.

$sth = $dbh->prepare($q) or die $dbh->errstr;
...
    $sth->execute(@h);
  }
}