Re: Centos 7 getadsmtp.pl outputing blank

[poj]

At version 0.58 (Dec 2013) the example code in LDAP::Control::Paged was changed (bug fix RT#91210: Paged.pm: fix example code) from what you have to this.

 my $cookie;
 while (1) {
   # Perform search
   my $mesg = $ldap->search( @args );

   # add you code here for
   # Filtering results for proxyAddresses attributes

   # Only continue on LDAP_SUCCESS
   $mesg->code  and last;

   # Get cookie from paged control
   my($resp)  = $mesg->control( LDAP_CONTROL_PAGED )  or last;
   $cookie    = $resp->cookie;

   # Only continue if cookie is nonempty (= we're not done)
   last  if (!defined($cookie) || !length($cookie));

   # Set cookie in paged control
   $page->cookie($cookie);
 }

 if (defined($cookie) && length($cookie)) {
   # We had an abnormal exit, so let the server know we do not want an
+y more
   $page->cookie($cookie);
   $page->size(0);
   $ldap->search( @args );
 }

I'm not sure it's relevant but probably worth a try.

poj

[nycspud]

Here in 2019, it turns out someone had used this same script to pull email addresses from our AD server as well. It wouldn't work on CentOS7 so following the troubleshooting tips from poj, I added the line:

  print "mesg = ".Dumper($mesg);

It gave me this message:

'errorMessage' => 'Can\'t use string ("proxyAddresses") as an ARRAY re
+f while "strict refs" in use at /usr/share/perl5/vendor_perl/Convert/
+ASN1/_encode.pm line 269, <DATA> line 747.

So I changed attr => "proxyAddresses to attr => "@proxyAddresses" and the script dumped all email addresses to a file. although it generated the following warnings:

Possible unintended interpolation of @proxyAddresses in string at ./p.
+pl line 84, <DATA> line 747.
Name "main::proxyAddresses" used only once: possible typo at ./p.pl li
+ne 84, <DATA> line 747.

[afoken]

Possible unintended interpolation of @proxyAddresses in string

@ must be escaped in double quoted strings, and because you don't have an array named @proxyAddress, "@proxyAddress" evaluates to an empty string.

Another option is to use single quotes instead of double quotes.

Alexander

[nycspud]

I declared the array before it was used and that cleared the warning messages. Thanks to everyone on this thread for helping to get this working!