| line |
true |
false |
branch |
|
26
|
1 |
14 |
if @_ |
|
27
|
1 |
14 |
if @_ |
|
65
|
0 |
0 |
ref $_[0] ? : |
|
|
0 |
0 |
unless my $result = ref $_[0] ? shift() : $Net::LDAP::Entry::LDAPEntry->decode(shift()) |
|
71
|
0 |
0 |
if ($arg{'raw'}) |
|
73
|
0 |
0 |
unless 'dn' =~ /$arg{'raw'}/ |
|
77
|
0 |
0 |
unless $elem->{'type'} =~ /$arg{'raw'}/ |
|
93
|
15 |
28 |
@_ ? : |
|
98
|
0 |
0 |
if $^W |
|
104
|
0 |
0 |
if $^W |
|
122
|
1 |
374 |
if ($opt{'alloptions'}) |
|
124
|
2 |
13 |
$_->{'type'} =~ /^\Q$type\E((?:;.*)?)$/i ? : |
|
126
|
1 |
0 |
%ret ? : |
|
132
|
3 |
371 |
if ($opt{'nooptions'}) { } |
|
134
|
6 |
39 |
$_->{'type'} =~ /^\Q$type\E((?:;.*)?)$/i ? : |
|
137
|
0 |
3 |
unless @vals |
|
142
|
122 |
249 |
unless $attr = $attrs->{$type} |
|
148
|
100 |
1 |
wantarray ? : |
|
|
151 |
101 |
$opt{'asref'} ? : |
|
156
|
9 |
7 |
unless @_ |
|
166
|
4 |
71 |
$self->{'changetype'} eq 'modify' ? : |
|
173
|
97 |
0 |
unless exists $attrs->{$lc_type} |
|
175
|
88 |
9 |
ref $val ? : |
|
177
|
3 |
2 |
ref $val ? : |
|
|
5 |
92 |
if $cmd |
|
182
|
4 |
71 |
if $cmd |
|
190
|
1 |
0 |
$self->{'changetype'} eq 'modify' ? : |
|
196
|
1 |
0 |
if (defined $val and !ref($val) || @$val) { } |
|
199
|
0 |
1 |
unless exists $attrs->{$lc_type} |
|
201
|
1 |
0 |
ref $val ? : |
|
203
|
1 |
0 |
ref $val ? : |
|
|
1 |
0 |
if $cmd |
|
213
|
0 |
0 |
if $cmd |
|
219
|
1 |
0 |
if $cmd |
|
228
|
0 |
2 |
unless (@_) |
|
233
|
2 |
0 |
$self->{'changetype'} eq 'modify' ? : |
|
239
|
1 |
1 |
if (defined $val and !ref($val) || @$val) { } |
|
241
|
1 |
0 |
ref $val ? : |
|
243
|
0 |
1 |
unless (@{$$attrs{$lc_type};} = grep({not exists $values{$_};} @{$$attrs{$lc_type};})) |
|
251
|
1 |
0 |
ref $val ? : |
|
|
1 |
0 |
if $cmd |
|
260
|
1 |
0 |
if $cmd |
|
264
|
2 |
0 |
if $cmd |
|
276
|
0 |
0 |
unless $_[0]->code |
|
277
|
0 |
0 |
if $user_cb |
|
279
|
0 |
0 |
if (eval {
do {
$target->isa('Net::LDAP')
}
}) { } |
|
|
0 |
0 |
elsif (eval {
do {
$target->isa('Net::LDAP::LDIF')
}
}) { } |
|
280
|
0 |
0 |
if ($self->{'changetype'} eq 'add') { } |
|
|
0 |
0 |
elsif ($self->{'changetype'} eq 'delete') { } |
|
|
0 |
0 |
elsif ($self->{'changetype'} =~ /modr?dn/o) { } |
|
|
0 |
0 |
elsif (@{$self->{'changes'};}) { } |
|
290
|
0 |
0 |
if $newsuperior |
|
306
|
0 |
0 |
if $target->error |
|
323
|
1 |
1 |
$self->changes ? : |
|
|
2 |
2 |
exists $opt{'change'} ? : |
|
334
|
0 |
0 |
@_ ? : |
|
338
|
0 |
0 |
if $asn->{'objectName'} |
|
343
|
0 |
0 |
if length $_ > $l |
|
353
|
0 |
0 |
if $i++ |
|
364
|
1 |
23 |
if ($opt{'nooptions'}) { } |
|
368
|
1 |
14 |
$done{lc $1}++ ? : |
|
382
|
11 |
0 |
$ref ? : |