Perl 和 Sqlite

Question

谁能告诉我如何从 perl 访问 sqlite3 数据库。

代码

use DBI;
use DBD::SQLite;

my $dbh = DBI->connect(
  "dbi:SQLite:dbname=/cbilldata/media/database/collector.db","",""
) or die "Cannot connect: $DBI::errstr";

返回错误

DBI connect('dbname=/cbilldata/media/database/collector.db','',...) failed: database disk image is malformed at ./db.pl line 7
Cannot connect: database disk image is malformed at ./db.pl line 7.

Answer 1

要么您的 DBD::SQLite 版本非常使用 SQLite 2 而不是 3，要么消息是准确的并且您的数据库已损坏。