Похоже, вы пытаетесь подключиться к Oracle Internet Directory (OID), который является реализацией LDAP ... а не к базе данных Oracle напрямую.Правильный?
Если это так, Net :: LDAP полностью через Perl ...
my $LSERV = 'yourldaphost.yourdomain.com';
my $BASE_DN = 'cn=*,dc=*,dc=*'; # these * values must be filled in correctly for your LDAP
my $timeout = 10; # How long to wait (in secs).
my $success; my $message;
my $ldap = Net::LDAP->new(
$LSERV,
timeout => $timeout
) or die "! Unable to connect to OID LDAP.";