our$DBH=DBI->connect("DBI:mysql:database=$DB_NAME;host=$DB_HOST",$DB_USER,$DB_PASS,{RaiseError=>1,mysql_auto_reconnect=>0})||die"Could not connect to database: $DBI::errstr";
our$DBH=DBI->connect("DBI:mysql:database=$DB_NAME;host=$DB_HOST",$DB_USER,$DB_PASS,{RaiseError=>1,mysql_auto_reconnect=>1})||die"Could not connect to database: $DBI::errstr";