1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-07 14:19:10 -04:00

fixed for older DBI

This commit is contained in:
Kenichi Ishigaki 2019-01-26 07:12:40 +09:00
parent fa6a2c7040
commit b0fad50e4c

View file

@ -14,7 +14,7 @@ our $scan_results = [
my $dbh = connect_ok(RaiseError => 1, AutoCommit => 1); my $dbh = connect_ok(RaiseError => 1, AutoCommit => 1);
# register the module # register the module
$dbh->sqlite_create_module(perl => "DBD::SQLite::VirtualTable::PerlData"); $dbh->$sqlite_call(create_module => perl => "DBD::SQLite::VirtualTable::PerlData");
$dbh->do(<<'SQL'); $dbh->do(<<'SQL');
CREATE VIRTUAL TABLE temp.scan_results CREATE VIRTUAL TABLE temp.scan_results
USING perl(file varchar, USING perl(file varchar,