our %info;
do ".htinfo" or die "Problem reading '.htinfo'!\n";
my $dbh = DBI->connect( "DBI:mysql:$info{db}", $info{user}, $info{pass} );