her method to decode the HASH?
>
>
>
> Net::LDAP::Search=HASH(0x1844ba4)
> changetype: modify
> replace: manager
> Net::LDAP::Search=HASH(0x1844ba4)
> changetype: modify
> replace: manager
> Net::LDAP::Search=HASH(0x1844ba4)
> changetype: modify
> replace: mana
Thanks for replying. All the my's are fine. I need $dn and $mgrdn to bind
perform different searches. If it's possible to use $dn for both searches, I'll
be researching that.
Not sure why you think a DN is not returned as that is exactly what I get back
from AD.
The goal here is build
Getting closer. I've started over using new code from the examples. Without the
second while or LDAPsearchmgr code, we get the desired results using while
() etc...:
dn: cn=me,dc=corp
changetype: modify
replace: manager
Unfortunately, attempts to insert a second while with LDAPsea
Thanks. Using the pop-entry line does in fact return all the DN's from the
input file. Unfortunately, once I try to print the next two lines and insert
more code to iteratively lookup and print a dn, everything breaks. The goal is
to print to a file in the following order:
search dn result
Making these changes:
my $true = 1;
while ($true) {
print OUT "$dn", "\n";
# $entry = $dn->pop_entry;
# print $result->write_entry($entry);
#next unless $dn;
print OUT "changetype: modify", "\n";
print OUT "replace: manager", "\n";
}
Causes this
Grateful for your time and expertise, I am searching for a method to resolve
the issue with how pop_entry() is coded. I've provided the code and the error.
Thanks.
C:\Temp10>c:\perl\bin\perl ldif3a.pl
Use of uninitialized value $entry in concatenation (.) or string at
c:/Perl/sit
