我有件事不明白。
下面是一段代码:
use warnings;
use strict;
my $db_name = 'xxx';
my $user = 'xxx';
my $pw = 'xxx';
use DBI;
my $dbh = DBI->connect("DBI:mysql:$db_name", $user, $pw)
|| die "Could not connect to database: $DBI::errstr";
$dbh -> do('drop table umlaute;');
$dbh -> do(
"create table umlaute (
txt varchar(3) primary key -- will not work if primary key enabled
)") || die "could not create table";
$dbh -> begin_work;
my $sth = $dbh -> prepare ("insert into umlaute values (?)") or die "prepare failed";
for my $a ( 'a' .. 'z' , 'ä', 'ö', 'ü') {
for my $b ( 'a' .. 'z' , 'ä', 'ö', 'ü') {
for my $c ( 'a' .. 'z' , 'ä', 'ö', 'ü') {
$sth -> execute ("$a$b$c") or die "could not insert $a$b$c";
}}}
$dbh->commit;
# check count
my $cnt = $dbh -> selectrow_arrayref("select count(*) from umlaute")->[0];
if ($cnt != 29*29*29) {
print "$cnt != 29*29*29n";
}
else {
print "$cntn";
}
$dbh -> do('drop table performance_insert;');
当表umlaute上没有主键时,它会像我认为的那样工作。然而,如果我"启用"主键,它将失败。有趣的是,脚本成功地插入了ä和ö,但没有插入ü。
任何提示,为什么这是不工作的赞赏。这很可能是我没有发现的东西,所以四只眼睛比两只眼睛看得多。
这似乎是一个编码问题,你应该阅读手册部分字符集支持来解决这个问题。尝试将编码设置为UTF-8
列最有可能使用latin1_swedish_ci排序。在创建表时声明不同的排序规则,例如latin1_bin。字符集和排序值得理解,因为如果您发现需要支持latin1字符集以外的字符,它可以节省您以后的工作。