Net::LDAP::FilterMatch(3pm) | User Contributed Perl Documentation | Net::LDAP::FilterMatch(3pm) |
Net::LDAP::FilterMatch - LDAP entry matching
use Net::LDAP::Entry; use Net::LDAP::Filter; use Net::LDAP::FilterMatch; my $entry = new Net::LDAP::Entry; $entry->dn("cn=dummy entry"); $entry->add ( 'cn' => 'dummy entry', 'street' => [ '1 some road','nowhere' ] ); my @filters = (qw/(cn=dummy*) (ou=*) (&(cn=dummy*)(street=*road)) (&(cn=dummy*)(!(street=nowhere)))/); for (@filters) { my $filter = Net::LDAP::Filter->new($_); print $_,' : ', $filter->match($entry) ? 'match' : 'no match' ,"\n"; }
This extension of the class Net::LDAP::Filter provides entry matching functionality on the Perl side.
Given an entry it will tell whether the entry matches the filter object.
It can be used on its own or as part of a Net::LDAP::Server based LDAP server.
In case of error undef is returned.
For approximate matching like (cn~=Schmidt) there are several modules that can be used. By default the following modules will be tried in this order:
String::Approx Text::Metaphone Text::Soundex
If none of these modules is found it will fall back on a simple regexp algorithm.
If you want to specifically use one implementation only, simply do
use Net::LDAP::FilterMatch qw(Text::Soundex);
Net::LDAP::Filter
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Hans Klunder <hans.klunder@bigfoot.com> Peter Marschall <peter@adpm.de>
2021-01-03 | perl v5.32.0 |