Perl - Зло....

авторprint "Content-Type: text/html\n\n";
.....

$dbh = DBI->connect("DBI:mysql:database=$database",$opt_user,$opt_password) ||die "Can't connect: $DBI::errstr\n";

$sth = $dbh->prepare("SET NAMES utf8");
$sth->execute;
$sth = $dbh->prepare('SET CHARACTER SET utf8');
$sth->execute;
$sth = $dbh->prepare('SET COLLATION_CONNECTION="utf8_general_ci"');
print ("INSERT INTO `tovar` (`tovar`, `tech`, `idi`, `idk`, `cena`) VALUES ('$input{'tovar'}','$input{'opisred'}',$input{'vibori'},$input{'vibork'},$input{'cena'})");
$sth = $dbh->prepare ("INSERT INTO `tovar` (`tovar`, `tech`, `idi`, `idk`, `cena`) VALUES ('$input{'tovar'}','$input{'opisred'}',$input{'vibori'},$input{'vibork'},$input{'cena'})");
$sth->execute;



Так вот при выполнении в таблице появляются данные - вместо tovar и tech стоит нул , `idi`, `idk`, `cena` числа они встовляются...
print выводит запрос
INSERT INTO `tovar` (`tovar`, `tech`, `idi`, `idk`, `cena`) VALUES ('ложка','ложка 1',4,10,100)
его выполняю в phpmyadmin все прекрасно вставляется...

Думаю дело в кодировке.. но как это исправить не знаю(((