Perl中的SQLite连接字符串

Question

我在perl中使用以下sqlite连接字符串来连接sqlite数据库并得到以下错误

  

无法设置DBI :: db = HASH（0x2c34194）-> {PRAGMA journal_mode}：无法识别的属性名称或无效值

my $driver   = "SQLite"; 
my $database = "C:\\Sample\\Sample_Sqlite\\Activities.db3;PRAGMA journal_mode=WAL;";

my $dsn = "DBI:$driver:dbname=$database";
print $dsn;
my $dbh = DBI->connect(          
    $dsn,                          
    { RaiseError => 1 },         
) or die $DBI::errstr;

Answer 1

阅读the section on PRAGMA in the DBD::SQLite documentation时，您似乎在错误的时间设置了PRAGMA。它不应该是连接字符串的一部分，而应该是连接后运行的SQL命令。

} expected

更新：可能还需要注意}设置是持久性的。因此，您只需要设置一次，然后就可以从连接代码中完全删除它。