Select Code to Download

"DBD::SQLite::db prepare failed: file is encrypted or is not a databas
+e(26) at dbdimp.c line 269 at a.pl line 10.
Can't call method "execute" on an undefined value at a.pl line 3."

use DBI qw(:sql_types);
my $dbh = DBI->connect("DBI:SQLite:media.vdb");
...
$sth->execute();
@row=$sth->fetchrow();
print "ROW|@row|\n";