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

Re: getting bindDN in perl script



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

-- 
Dieter KlÃnter | Systemberatung
http://dkluenter.de
GPG Key ID:DA147B05
53Â37'09,95"N
10Â08'02,42"E