20 |
|
|
21 |
my $config = { |
my $config = { |
22 |
yaml_dir => './yaml/', |
yaml_dir => './yaml/', |
23 |
listen => 'localhost:1389', |
listen => shift @ARGV || 'localhost:1389', |
24 |
upstream_ldap => 'ldap.ffzg.hr', |
upstream_ldap => 'ldap.ffzg.hr', |
25 |
upstream_ssl => 1, |
upstream_ssl => 1, |
26 |
overlay_prefix => 'ffzg-', |
overlay_prefix => 'ffzg-', |
99 |
|
|
100 |
if ( defined $response->{protocolOp}->{searchResEntry} ) { |
if ( defined $response->{protocolOp}->{searchResEntry} ) { |
101 |
my $uid = $response->{protocolOp}->{searchResEntry}->{objectName}; |
my $uid = $response->{protocolOp}->{searchResEntry}->{objectName}; |
102 |
warn "## SEARCH $uid"; |
warn "## objectName $uid"; |
103 |
|
|
104 |
my @attrs; |
my @attrs; |
105 |
|
|