Perl и Sqlite

Question

Может кто-нибудь сказать мне, как получить доступ к базе данных sqlite3 из Perl.

код

use DBI;
use DBD::SQLite;

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

возвращает ошибку

Не удалось подключиться к DBI ('dbname = / cbilldata / media / database / collector.db', '', ...): образ диска базы данных поврежден в строке ./db.pl 7
Не удается подключиться: образ диска базы данных искажен в строке ./db.pl 7.

Answer 1

Либо ваша версия DBD :: SQLite является очень старой, которая использует SQLite 2, а не 3, либо сообщение является точным, и ваша база данных повреждена.