Re: DBI DBD::SQLite unable to open Firefox cookies.sqlite database

This seems to be a simple syntax error. The DSN string is too long:

qq(dbi:SQLite:dbname=$db,'','',{ ...
[download]

The qq() extends beyond the first comma, which is not what you want. You want:

qq(dbi:SQLite:dbname=$db),'','',{ ...
[download]

Usually, in such situations, I try to separate the steps:

my $dsn = "qq(dbi:SQLite:dbname=$db)";
my $user;
my $password;
my %dbi_options = (
    RaiseError => 1,
    PrintError => 1,
    sqlite_open_flags => SQLITE_OPEN_READONLY,
);

my $dbh = DBI->connect($dsn, $user, $password, \%dbi_options);
[download]

Comment on Re: DBI DBD::SQLite unable to open Firefox cookies.sqlite database Select or Download Code

Replies are listed 'Best First'.

Re^2: DBI DBD::SQLite unable to open Firefox cookies.sqlite database
by Discipulus (Canon) on Nov 29, 2022 at 12:09 UTC

Corion

I modified the code but it fails anyway with empty var (both cookiesTEST.sqlite and cookies.sqlite tested) so it access the DB but still fails reading it

use strict;
use warnings;
use Data::Dumper;
use DBI;
use DBD::SQLite;
my $db = $ENV{AppData}.'\Mozilla\Firefox\Profiles\nwk2oixj.default-rel
+ease\cookiesTEST.sqlite';
die "DB file not found!" unless -e $db;

print "sqlite DBD version: $DBD::SQLite::sqlite_version\n";

my $dsn = qq(dbi:SQLite:dbname=$db);
my $user;
my $password;
my %dbi_options = (
    RaiseError => 1,
    PrintError => 1,
    sqlite_open_flags => 'SQLITE_OPEN_READONLY',
);

my $dbh = DBI->connect($dsn, $user, $password, \%dbi_options);
my $sth = $dbh->prepare(q(SELECT * FROM moz_cookies )); 
$sth->execute(); # PS added this and it works :)

print Dumper $sth->fetchall_arrayref({});

__END__

sqlite DBD version: 3.39.4
$VAR1 = [];
[download]

PS ..obviously executing the statement helps :) thanks 1nickt++

There are no rules, there are no thumbs..
Reinvent the wheel, then learn The Wheel; may be one day you reinvent one of THE WHEELS.

[reply]
[d/l]
[select]


Welcome to the Monastery
	PerlMonks