Select Code to Download

database shell
search   /var/pg2ldap/backend.pl

create view ldap as select agency as objectclass,
   (agency || '-' || folderid) as dnqualifier,
...
   comment as description
   from userspool
   where state = 'ACTIVE'

use strict;
use Parse::RecDescent;
...
    my $parser = new Parse::RecDescent($grammar) or die "Bad grammar!\
+n";
    return $parser->translate($filter);
}