my $sth = $dbh->prepare(<<SQL) or die "Can't prepare: ", $dbh->errstr;
insert into data
(data_1, data_2)
values (?, ?)
SQL