use DBI;

my $dbargs = 
{
	AutoCommit => 0,
	PrintError => 1
};

my $dbscns = "dbi:SQLite:dbname=$Db_dbn";
&debug::debug("\$dbscns = '$dbscns\n");

my $dbshan = DBI->connect($dbscns,"","",$dbargs);
&debug::debug("\$dbshan = '$dbshan'\n");