Select Code to Download

... 
  my $conn = "dbi:Oracle:HOST=$host;SID=$sid;port=1521"; 
...
                                        return undef; 
                                      }; 
...

**********************************************************************
+* 
Fatal NI connect error 12541, connecting to: 
...
(DESCRIPTION=(ADDRESS=(HOST=machineA.com)(PROTOCOL=tcp)(PORT=1521))(CO
+NNECT­_DATA=(SID=aaa)(CID=(PROGRAM=t2.pl@bbb) 
(HOST=aaa)(USER=uuuuu))))