You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
24 lines
449 B
24 lines
449 B
#!/usr/bin/perl |
|
|
|
use strict; |
|
use warnings; |
|
use utf8; |
|
|
|
use Test; |
|
use LDV::LDAP; |
|
use Data::Dumper; |
|
|
|
BEGIN { plan test => 2 }; |
|
|
|
my $ldap = LDV::LDAP->new({ |
|
server => '127.0.0.1', |
|
binddn => undef, |
|
bindpass => undef, |
|
userbase => undef, |
|
}); |
|
|
|
print Dumper $ldap->get("ad_user"); |
|
#print Dumper $ldap->create("test20"); |
|
#print Dumper $ldap->get("test20"); |
|
#print Dumper $ldap->delete("test20"); |
|
print Dumper $ldap->get("test20");
|
|
|