Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

20 lines (12 sloc) 0.264 kb
#!perl
BEGIN {
require "t/common.pl";
start_server(version => 3);
}
print "1..2\n";
$ldap = client();
print "ok 1\n";
$dse = $ldap->root_dse or print "not ";
print "ok 2\n";
use Net::LDAP::LDIF;
Net::LDAP::LDIF->new(qw(- w))->write_entry($dse) if $dse;
Jump to Line
Something went wrong with that request. Please try again.