1package Slapd::Backend::Constant; 2 3=head1 NAME 4 5Slapd::Backend::Constant - useful ldap constants 6 7=head1 DESCRIPTION 8 9Useful constants, undeclared in Net::LDAP::Constant. 10 11=cut 12 13use utf8; 14use strict; 15use warnings; 16use Exporter 'import'; 17our @EXPORT = qw( 18 LDAP_SCOPE_BASE 19 LDAP_SCOPE_ONE 20 LDAP_SCOPE_SUB 21 LDAP_SCOPE_CHILDREN 22 LDAP_DEREF_NEVER 23 LDAP_DEREF_SEARCH 24 LDAP_DEREF_FIND 25 LDAP_DEREF_ALWAYS 26); 27 28=head1 CONSTANTS 29 30=over 31 32=item LDAP_SCOPE_BASE (0) 33 34=item LDAP_SCOPE_ONE (1) 35 36=item LDAP_SCOPE_SUB (2) 37 38=item LDAP_SCOPE_CHILDREN (3) 39 40=cut 41 42use constant { 43 LDAP_SCOPE_BASE => 0, 44 LDAP_SCOPE_ONE => 1, 45 LDAP_SCOPE_SUB => 2, 46 LDAP_SCOPE_CHILDREN => 3, 47}; 48 49=item LDAP_DEREF_NEVER (0) 50 51=item LDAP_DEREF_SEARCH (1) 52 53=item LDAP_DEREF_FIND (2) 54 55=item LDAP_DEREF_ALWAYS (3) 56 57=cut 58 59use constant { 60 LDAP_DEREF_NEVER => 0, 61 LDAP_DEREF_SEARCH => 1, 62 LDAP_DEREF_FIND => 2, 63 LDAP_DEREF_ALWAYS => 3, 64}; 65 66=back 67 68=cut 69 701; 71 72=head1 SEE ALSO 73 74Net::LDAP::Constant 75 76=head1 AUTHOR 77 78Aleksey Mashanov <aleksey.mashanov@gmail.com> 79 80=head1 LICENSE 81 82This library is free software, you can redistribute it and/or modify it under 83the same terms as Perl itself. 84 85=cut 86