Made DBI connect changes suggested by Brett Williams.
[eq/.git] / bin / parse_ward_data
index c2397cf211ee586971b917ac5a964508788ef28e..7a3c07249ef4b5edafa6a21d19f7114a1f2fc153 100755 (executable)
@@ -94,7 +94,7 @@ sub print_birthdays
 
 ###################################################
 # Open a connection to the database
-$dbh=DBI->connect("dbi:mysql:dbname=$dbname;host=$dbhost;port=$dbport",$dbuser,$dbpass,{
+$dbh=DBI->connect("dbi:mysql:dbname=$dbname:host=$dbhost:port=$dbport",$dbuser,$dbpass,{
     AutoCommit=>0,
     PrintError=>0}) or print "Connect Failure:".$DBI::errstr."\n" and exit 2;