my $insertMACDDataSQL = "INSERT INTO `%s` (date, stockId, macdSignal, macd, macdHistogram, macdIsAsOfClose) VALUES ('%s', %s, %s, %s, %s, %s)
ON DUPLICATE KEY UPDATE macdSignal = VALUES(macdSignal), macd = VALUES(macd), macdHistogram = VALUES(macdHistogram), macdIsAsOfClose = VALUES(macdIsAsOfClose);";

...


my $sql = sprintf($insertMACDDataSQL, $stock, $MACDDate, $stockId, $MACDSignal, $MACD, $MACDHist, $MACDIsAsOfClose);
print $sql."\n";
my $result = $dbHandle->do($sql);
print Data::Dumper::Dumper($result)."\n";

##</code><code>##

INSERT INTO `TSE:AC` (date, stockId, macdSignal, macd, macdHistogram, macdIsAsOfClose) VALUES ('2007-01-09', 2191, -0.0991, 0.0500, 0.1491, 1)
ON DUPLICATE KEY UPDATE macdSignal = VALUES(macdSignal), macd = VALUES(macd), macdHistogram = VALUES(macdHistogram), macdIsAsOfClose = VALUES(macdIsAsOfClose);
$VAR1 = 1;