The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
Net::LDAP::Filter::SQL
======================

Synopsis
--------

------------------------------------------------------------------------------------------------------------------
my $ldapfilter  = new Net::LDAP::Filter::SQL('(&(name=Marge)(city=Springfield))');

my $sql = 'select * from sometable where '.$ldapfilter->sql_clause;

$dbh->selectall_arrayref($sql, undef, $ldapfilter->sql_values);
------------------------------------------------------------------------------------------------------------------

Data tranformation
------------------

.source data
------------------------------------------------------------------------------
"(&(name=Marge)(city=Springfield))";
------------------------------------------------------------------------------

.target data
------------------------------------------------------------------------------
['name = ? and city = ?', ['Marge', 'Springfield'] ]
------------------------------------------------------------------------------

// vim: syn=asciidoc