Không chắc liệu nó có hữu ích không, nhưng những điều sau đây đã hiệu quả với tôi:
ĐỂ kết nối cục bộ bằng tnsnames.ora (bên trong thư mục $ ORACLE_HOME / network / admin):
my $db = DBI->connect( "dbi:Oracle:mydatabase", "scott", "tiger" );
và để kết nối không sử dụng tnsnames.ora:
my $db = DBI->connect("dbi:Oracle:host=$host;sid=$sid;port=1521",$user,$passwd)
|| die( $DBI::errstr . "\n" );
trong đó $ host, $ sid phải được xác định trước.