use MyConstants qw/LOGIN PASS IP DB_NAME/;
DBI->connect ("DBI:mysql:host=".IP.";database=".DB_NAME."", LOGIN, PAS
+S,{PrintError => 0, RaiseError => 1})