$db_homenet = DBI->connect( ... ) or die "DBI connect failed: $DBI::errstr";