Select Code to Download

$self->{db} = DBI->connect(
    "dbi:SQLite:dbname=$db_file",
...
    "",
    {RaiseError => $self->{db_err}}
) or die $DBI::errstr;