From: Marshall.Andrew <Mar...@ca...> - 2001-08-01 13:01:48
|
Howdy. I am trying to use perl-ldap 0.24 to connect to a Netscape Directory server running on a different system and I can't get it to work. When I run this script: <script> #!/usr/bin/perl use Net::LDAP qw(:all); use Net::LDAP::Util qw(ldap_error_text ldap_error_name ldap_error_desc ); $ldap = Net::LDAP->new("172.16.17.150", debug => 12) or die "$@"; print STDERR "before bind."; $mesg = $ldap->bind(); die "Error ",ldap_error_name($mesg->code) if $mesg->code; print STDERR "bind okay."; $mesg = $ldap->search ( base => "ou=People,o=Canada Trust,c=ca", filter => "(uid=Marshall.Andrew)" ); die "Error ",ldap_error_name($mesg->code) if $mesg->code; $mesg->code && die $mesg->error; $ldap->unbind; </script> Here's what I see: <script log> $ perl test1.pl before bind.Net::LDAP=HASH(0xa011250) sending: 0000 30 12: SEQUENCE { 0002 02 1: INTEGER = 1 0005 60 7: [APPLICATION 0] { 0007 02 1: INTEGER = 2 000A 04 0: STRING = '' 000C 80 0: [CONTEXT 0] 000E : } 000E : } Error LDAP_OPERATIONS_ERROR at test1.pl line 11. </script log> I can connect to the directory server just fine using Netscape's ldapsearch tool. I am running the Cygwin Unix tools on top of Windows NT 4. The version of Perl I'm using is the latest one pointed to from www.cygwin.com. Here's what Perl tells me about itself: <perl -V> Summary of my perl5 (revision 5.0 version 6 subversion 1) configuration: Platform: osname=cygwin, osvers=1.1.6(0.3032), archname=cygwin uname='cygwin_nt-5.0 fifer 1.1.6(0.3032) 2000-11-21 21:00 i686 unknown ' config_args='-de' hint=recommended, useposix=true, d_sigaction=define usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef useperlio=undef d_sfio=undef uselargefiles=define usesocks=undef use64bitint=undef use64bitall=undef uselongdouble=undef Compiler: cc='gcc', ccflags ='-DPERL_USE_SAFE_PUTENV -DHAS_SBRK_PROTO -fno-strict-aliasing', optimize='-O2', cppflags='-DPERL_USE_SAFE_PUTENV -DHAS_SBRK_PROTO -fno-strict-aliasing' ccversion='', gccversion='2.95.2-5 19991024 (cygwin experimental)', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=4 alignbytes=8, usemymalloc=y, prototype=define Linker and Libraries: ld='ld2', ldflags =' -s -L/usr/local/lib' libpth=/usr/local/lib /usr/lib /lib libs=-lgdbm -lcrypt perllibs=-lcrypt libc=/usr/lib/libc.a, so=dll, useshrplib=true, libperl=libperl5_6_1.a Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' -s' cccdlflags=' ', lddlflags=' -s -L/usr/local/lib' Characteristics of this binary (from libperl): Compile-time options: USE_LARGE_FILES Locally applied patches: v5.6.1-TRIAL1 Built under cygwin Compiled at Dec 21 2000 21:39:40 @INC: /usr/lib/perl5/5.6.1/cygwin /usr/lib/perl5/5.6.1 /usr/lib/perl5/site_perl/5.6.1/cygwin /usr/lib/perl5/site_perl/5.6.1 /usr/lib/perl5/site_perl . </perl -V> I suspect I should be using a different Perl implementation or there's something wrong with how I installed it (please be kind, I'm a Perl novice). Any suggestions? Thanks, adm Andrew D. Marshall |