perlとDBIについて

質問

use DBI;
#ユーザー名
$DBusr = 'ユーザー名';
#パスワード
$DBpass = 'パスワード';
#DB名
$DB = 'DBI:mysql:データベース名:localhost';
#テーブル名
$DBtable = 'テーブル名;

$dbh = DBI->connect($DB, $DBusr, $DBpass);

if($syoujyou ne "" && $geninn ne "" && $taisyo ne ""){
$INSERT = $dbh -> prepare("INSERT INTO $DBtable (syurui,syoujyou,geninn,taisyo) VALUES ('$syurui','$syoujyou','$geninn','$taisyo')");
$INSERT -> execute();
$INSERT -> finish;
}
$dbh->disconnect;

としているのですが、データ内容がデータベースに受けわたりません。

データベースに直接

INSERT INTO $DBtable (syurui,syoujyou,geninn,taisyo) VALUES ('aaaa','bbbb','cccc','dddd');

とすればデータは入ります。

ＤＢＩ構文の書き方が可笑しいのでしょうか？
詳しい方ご教授お願い致します。

回答No.1

rafysta

関係ないかもしれませんが、
> $DB = 'DBI:mysql:データベース名:localhost';
の部分ですが、僕はいつも
$DB = 'DBI:mysql:データベース名';
としています。tamaneleさんの方が正しい書き方なのかもしれませんが・・・。

他の部分の構文の書き方は、すべて正しいと思います。

補足

それでもデータベースにちゃんとデータを送れないんですよね…。
何か他の要因があるのでしょうか？初期設定などに何か気をつける事などありますか？？