$dbh = DBI->connect('dbi:Oracle:', qq{$username/$passwd@(DESCRIPTION=
 (ADDRESS=(PROTOCOL=TCP)(HOST= $ips[$icnt])(PORT=1521))
 (CONNECT_DATA=(SID=$site)))}, "") || die "Can't connect vi SQLNET to
+Database: $! $site";