My previous (albeit limited) attempts to debug dlap calls in perl have =20=
been facilitated by:
1) pulling down a copy of the ldif file.
2) phpldapbrowser.php
Not all ldif files are made the same... custom fields and non-standard
=20=
field content can sometimes make it look like your code is wrong when,
=20=
in fact, it's doing exactly what you thought it should.
YMMV.
--Shelly (on US Mountain time)
On Nov 27, 2007, at 6:55 AM, Dennis Putnam wrote:
> I should have guessed. No one in their right mind would be up this =20
> early. :-)
>
> I tried Dumper and sure enough there was something in =20
> 'errorMessage' (I wonder why it didn't give me an error return?). It
=20=
> said "Bad Filter" so now I have something to work with. Thanks.
>
> On Nov 27, 2007, at 7:46 AM, Jeremiah Foster wrote:
>
>> Heh, I am in Stockholm, Central European Time. :)
>>
>>> -----Original Message-----
>>> From: Dennis Putnam [mailto:dennis.putnam@[EMAIL PROTECTED]
>>> Sent: den 27 november 2007 13:42
>>> To: macosx@[EMAIL PROTECTED]
>>> Cc: Jeremiah Foster
>>> Subject: Re: ldapsearch equivalent with Net::LDAP
>>>
>>> Thanks again. I see you are an early riser too. No, I am not
>>> familiar with that (I'm not a Perl expert either). I'll look
>>> it up and see what it can give me.
>>>
>>> On Nov 27, 2007, at 7:17 AM, Jeremiah Foster wrote:
>>>
>>>> Did you try using Data::Dumper? It is a built-in module and is
>>>> incredibly useful. You can use it to dump out the contents of $mesg
>>>> for example.
>>>>
>>>>> -----Original Message-----
>>>>> From: Dennis Putnam [mailto:dennis.putnam@[EMAIL PROTECTED]
>>>>> Sent: den 27 november 2007 13:16
>>>>> To: macosx@[EMAIL PROTECTED]
>>>>> Cc: Jeremiah Foster
>>>>> Subject: Re: ldapsearch equivalent with Net::LDAP
>>>>>
>>>>> Thanks for the reply. I'm not an LDAP expert either but
>>> this issue is
>>>>> more of a Perl Net::LDAP user than an LDAP expert per se.
>>>>> Unfortunately there are no real world working script
>>> examples readily
>>>>> available. The samples that are, show the syntax but not
>>> the context,
>>>>> making them pretty much useless to the novice.
>>>>>
>>>>> The script is not 'die'ing so it never really gets to that point.
>>>>> Whether I use '$!' or '$@[EMAIL PROTECTED]
' won't matter until I actually
>>> get an error
>>>>> condition. It appears that everything is working except the search
>>>>> returns zero entries. Since 'ldapsearch'
>>>>> works it is clearly not a server problem. That leaves only
>>> the way I
>>>>> am trying to use Net::LDAP. There does not appear to be any way to
>>>>> cause Net::LDAP to generate informational messages about
>>> the dialog
>>>>> that occurs between it and the LDAP server. I don't see any way to
>>>>> debug this.
>>>>>
>>>>> On Nov 27, 2007, at 3:20 AM, Jeremiah Foster wrote:
>>>>>
>>>>>>
>>>>>>
>>>>>> -----Original Message-----
>>>>>> From: Jeremiah Foster
>>>>>> Sent: den 27 november 2007 09:20
>>>>>> To: 'Dennis Putnam'
>>>>>> Subject: RE: ldapsearch equivalent with Net::LDAP
>>>>>>
>>>>>>
>>>>>>
>>>>>>> I am trying to do the equivalent of this search:
>>>>>>>
>>>>>>> ldapsearch -x -LLL -b "dc=3Dldaphost,dc=3Dmydomain,dc=3Dcom" =
uid
>>>>>>
>>>>>> Caveat Emptor: I am no LDAP genius.
>>>>>>
>>>>>>> Here is one of the many variations I tried:
>>>>>>>
>>>>>>> use strict;
>>>>>>> use Net::LDAP;
>>>>>>>
>>>>>>> my $ldap=3DNet::LDAP->new("ldaphost.mydomain.com") or
>>> die "$@[EMAIL PROTECTED]
";
>>>>>>
>>>>>> Try replacing $@[EMAIL PROTECTED]
with $!. You are using $@[EMAIL PROTECTED]
which is the
>>> eval error
>>>>>> message, but I don't see where you are using eval. $!
>>> will tell you
>>>>>> what went wrong since it is the sys/libcall error message.
>>>>>>
>>>>>>> my $mesg=3D$ldap->bind();
>>>>>>>
>>>>>>> if ($#ARGV<0) {
>>>>>>> $mesg=3D$ldap->search(
>>>>>>>
base=3D>"dc=3Dldaphost,dc=3Dmydomain,dc=3Dcom"=
,
>>>>>>> attrs=3D>["uid"]
>>>>>>> );
>>>>>>> print $mesg->entries(),"\n";
>>>>>>> }
>>>>>>> else {
>>>>>>> }
>>>>>>> $ldap->unbind();
>>>>>>>
>>>>>>>
>>>>>>> I am just starting so my code is incomplete but it should
>>>>> be enough
>>>>>>> to
>>>>>>
>>>>>>> get something. However, I get nothing, not even an error.
>>>>> Can someone
>>>>>>> see what I am doing wrong? TIA.
>>>>>>
>>>>>> See what your code spits out now and diagnose from there.
>>> Hopefully
>>>>>> that is a start.
>>>>>>
>>>>>> Jeremiah
>>>>>
>>>>>
>>>
>>>
>
>
<><><><><><><><><><><><><><><><><><><><><><><><><><><><>
Correspondence from Shelly Spearing =95 shellys@[EMAIL PROTECTED]
Leader
HPC-1 Scientific Software Engineering Group
Los Alamos National Laboratory
MS B295, Los Alamos, NM 87545
03-132-345 505 664 0667 =95 FAX: 505 665 5402
<><><><><><><><><><><><><><><><><><><><><><><><><><><><>
|
