my $dbh = DBI->connect("dbi:mysql:$DBName:$IP", "$db_user", "$db_password", {RaiseError => 0, PrintError => 0} ) or err_trap("Cannot connect to the database");