in reply to search result on Net LDAP
} elsif ( $result->count() eq '0' ) { my $entry = $result->entry(0); if ( $entry ) { print "********",$entry->dn(),"*********\n"; + } else { # blah blah blah } #my @pattrs = $entry->attributes; #print "******** @pattrs **********\n"; } else {
In Section
Seekers of Perl Wisdom