line |
true |
false |
branch |
77
|
0 |
0 |
if exists $Type2Pkg{$oid} and $Type2Pkg{$oid} ne $class |
80
|
0 |
0 |
if exists $Pkg2Type{$class} and $Pkg2Type{$class} ne $oid |
89
|
0 |
7 |
@_ & 1 ? : |
94
|
0 |
7 |
unless ($args{'type'} =~ /^\d+(?:\.\d+)+$/) |
99
|
4 |
3 |
if ($pkg eq 'Net::LDAP::Control' and exists $Type2Pkg{$args{'type'}}) |
101
|
0 |
4 |
unless eval "require $pkg" |
115
|
0 |
0 |
if ($class eq 'Net::LDAP::Control' and exists $Type2Pkg{$asn->{'type'}}) |
117
|
0 |
0 |
unless eval "require $class" |
128
|
0 |
0 |
unless $self->{'critical'} |
134
|
0 |
2 |
if @_ |
135
|
0 |
2 |
unless $self->{'critical'} |
140
|
0 |
0 |
if @_ |
142
|
0 |
0 |
unless $self->{'value'} |