| line |
true |
false |
branch |
|
196
|
0 |
0 |
ref $_[0] ? : |
|
197
|
0 |
0 |
unless $err2desc[$code] |
|
282
|
1 |
72 |
unless defined $dn and $dn ne '' |
|
287
|
0 |
72 |
ref $dn eq 'ARRAY' ? : |
|
|
18 |
54 |
unless my $rdns = ref $dn eq 'ARRAY' ? $dn : &ldap_explode_dn($dn, 'casefold', $opt{'casefold'} || 'upper') |
|
302
|
4 |
187 |
if (ref $val) { } |
|
306
|
0 |
187 |
if ($opt{'mbcescape'}) { } |
|
321
|
191 |
0 |
if (not $opt{'casefold'} or $opt{'casefold'} eq 'upper') { } |
|
|
0 |
0 |
elsif ($opt{'casefold'} eq 'lower') { } |
|
333
|
0 |
54 |
$opt{'reverse'} ? : |
|
431
|
0 |
76 |
unless defined $dn |
|
432
|
0 |
76 |
if $dn eq '' |
|
461
|
197 |
20 |
if (not $opt{'casefold'} or $opt{'casefold'} eq 'upper') { } |
|
|
20 |
0 |
elsif ($opt{'casefold'} eq 'lower') { } |
|
467
|
4 |
213 |
if ($val =~ s/^#//) { } |
|
476
|
11 |
33 |
length $1 == 1 ? : |
|
482
|
199 |
18 |
unless (defined $sep and $sep eq '+') |
|
483
|
0 |
199 |
if ($opt{'reverse'}) { } |
|
492
|
58 |
18 |
length $dn == (pos $dn || 0) ? : |
|
522
|
0 |
0 |
wantarray ? : |
|
546
|
0 |
0 |
wantarray ? : |
|
577
|
0 |
0 |
wantarray ? : |
|
601
|
0 |
0 |
length $1 == 1 ? : |
|
604
|
0 |
0 |
wantarray ? : |
|
680
|
0 |
0 |
if $@ |
|
683
|
0 |
0 |
unless $uri and ref($uri) =~ /^URI::ldap[is]?$/ |
|
685
|
0 |
0 |
unless exists $opt{'defaults'} |
|
692
|
0 |
0 |
if ($elements{'scheme'} eq 'ldapi') { } |
|
694
|
0 |
0 |
if $opt{'defaults'} or $uri->un_path |
|
698
|
0 |
0 |
if $opt{'defaults'} or $uri->host |
|
701
|
0 |
0 |
if $opt{'defaults'} or $uri->port |
|
705
|
0 |
0 |
if $opt{'defaults'} or $uri->dn or $url =~ m[^ldap[is]?://[^/]*/] |
|
708
|
0 |
0 |
if $opt{'defaults'} or $uri->attributes |
|
711
|
0 |
0 |
if $opt{'defaults'} or $uri->_scope |
|
714
|
0 |
0 |
if $opt{'defaults'} or $uri->_filter |
|
717
|
0 |
0 |
if $opt{'defaults'} or $uri->extensions |
|
722
|
0 |
0 |
wantarray ? : |
|
749
|
24 |
8 |
if ($generalizedTime =~ /^\s*(\d{4})(\d{2})(\d{2})
(\d{2})(?:(\d{2})(\d{2})?)?
(?:[.,](\d+))?\s*(Z|[+-]\d{2}(?:\d{2})?)\s*$/x) |
|
755
|
22 |
2 |
if ($year >= 1000) |
|
756
|
4 |
18 |
defined $dec ? : |
|
759
|
3 |
19 |
unless (defined $min) |
|
762
|
0 |
3 |
if ($dec) |
|
767
|
3 |
19 |
unless (defined $sec) |
|
770
|
0 |
3 |
if ($dec) |
|
777
|
22 |
0 |
unless ($@) |
|
781
|
14 |
8 |
unless ($@) |
|
782
|
4 |
10 |
if ($offset =~ /^([+-])(\d{2})(\d{2})?$/) |
|
785
|
2 |
2 |
unless $mindelta |
|
786
|
2 |
2 |
$direction eq '-' ? : |
|
792
|
4 |
10 |
if ($dec != 0) |
|
795
|
2 |
2 |
if ($time < 0) |
|
798
|
1 |
1 |
if $time == 0 |
|
847
|
8 |
0 |
if ($arg =~ /^(\-?)(\d*)(?:[.,](\d*))?$/) |
|
850
|
4 |
4 |
defined $dec ? : |
|
853
|
4 |
4 |
if ($sign) |
|
854
|
2 |
2 |
if ($dec != 0) |
|
864
|
0 |
8 |
if $year < -1900 or $year > 8099 |
|
871
|
0 |
4 |
$opt{'AD'} ? : |
|
|
4 |
4 |
$dec ? : |