/usr/share/perl5/Net/LDAPI.pm is in libnet-ldap-perl 1:0.5800-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 | # Copyright (c) 2003-2004 Derrik Pates <dpates@dsdk12.net> and Graham Barr
# <gbarr@pobox.com>. All rights reserved. This program is free
# software; you can redistribute it and/or modify it under the same
# terms as Perl itself.
package Net::LDAPI;
use strict;
use Net::LDAP;
our @ISA = qw(Net::LDAP);
our $VERSION = '0.04';
sub new {
shift->SUPER::new(@_, scheme => 'ldapi');
}
1;
__END__
=head1 NAME
Net::LDAPI - use LDAP over a UNIX domain socket
=head1 SYNOPSIS
use Net::LDAPI;
$ldapi = Net::LDAPI->new('/var/run/ldapi');
# alternate way
use Net::LDAP;
$ldapi = Net::LDAP->new('ldapi://');
=head1 DESCRIPTION
Communicate using the LDAP protocol to a directory server using a UNIX
domain socket. This mechanism is non-standard, UNIX-specific and not
widely supported.
All the normal C<Net::LDAP> methods can be used with a C<Net::LDAPI>
object; see L<Net::LDAP> for details.
=head1 CONSTRUCTOR
=over 4
=item new ( [SOCKPATH] )
Create a new connection. SOCKPATH can optionally be specified, to
specify the location of the UNIX domain socket to connect to.
If SOCKPATH is not given, the environment variable C<LDAPI_SOCK> is evaluated,
and if that does not exist, the value C</var/run/ldapi> is used.
See L<Net::LDAP/new> for further details.
=back
=head1 SEE ALSO
L<Net::LDAP>,
L<IO::Socket::UNIX>
=head1 BUGS
None yet.
=head1 AUTHOR
Derrik Pates E<lt>dpates@dsdk12.netE<gt>
=head1 COPYRIGHT
Copyright (c) 2003-2004, Derrik Pates and Graham Barr. All
rights reserved. This library is free software; you can redistribute
it and/or modify it under the same terms as Perl itself.
=cut
|