[Date Prev][Date Next] [Chronological] [Thread] [Top]

Re: getting bindDN in perl script

well, I must be missing something, because you are the second one to tell me that the binddn and bindpw are the two first parameters of the perl functions, but it doesn't seem to be the case.
like I said in one of my previous posts, I printed out the parameters of my search() function (in the SampleLDAP.pm file provided by openldap), like that : 

sub search {
    print "@_";
    .....

I get :
1st parameter : SampleLDAP=HASH(0x8657f80)
2nd : the base DN
3rd : the search scope
4th : deref
and so on...  (filter, attributes...)

but no sign of the bindDN and password



Le 15/05/2013 20:38, Dieter KlÃnter a Ãcrit :

Am Wed, 15 May 2013 17:56:59 +0100
schrieb Benin Technologies<benintechnologies@yahoo.fr>:


yes I'm using Net::LDAP in my back-perl to access a back-hdb server
and it works, but I always use the same hardcorded $bindDN and
$password (for example : $binddn = cn=admin,dc=my-domain and
$password = secret)

But I'd like to use the same bindDN and the same password as the one
that has been used to bind to the back-perl backend

Le 15/05/2013 17:14, Brian Reichert a Ãcrit :>
On Wed, May 15, 2013 at 03:42:44PM +0100, Benin Technologies wrote:
  >>  thanks, but I'm surprised, I don't see the bindDN and password in
the>>  parameter list of the perl subs
  >  This has nothing to to with OpenLDAP.
  >  >  >   From perl, you fird get an LDAP object:
  >  >  my $ldap = Net::LDAP->new($uri->as_string);
  >  >  then bind:
  >  >  my $mesg = $ldap->bind($bindDN, password=>  $passwd);
  >  >  then search:
  >  >  $mesg = $ldap->search( @search_args );
  >  >  once the bind has completed, nothing retains that information;
  >  >  it>
was only needed to bind.
  >  >  I have no idea what the architecture of your project is, but
  >  >  you'd
  >  be better off asking on one of the perl lists to work this stuff
  >  out.>


What about something like

my binddn = $ARGV[0];
my bindpw = $ARGV[1];

-Dieter