| blib/lib/Net/LDAP/Control.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| condition | 3 | 29 | 10.3 | 
| line | !l | l&&!r | l&&r | condition | 
|---|---|---|---|---|
| 79 | 0 | 0 | 0 | require Carp and Carp::croak("$oid is already registered to $Type2Pkg{$oid}") | 
| 0 | 0 | 0 | exists $Type2Pkg{$oid} and $Type2Pkg{$oid} ne $class | |
| 82 | 0 | 0 | 0 | require Carp and Carp::croak("$class is already registered to $Pkg2Type{$class}") | 
| 0 | 0 | 0 | exists $Pkg2Type{$class} and $Pkg2Type{$class} ne $oid | |
| 101 | 0 | 0 | 4 | $pkg eq 'Net::LDAP::Control' and exists $Type2Pkg{$args{'type'}} | 
| 117 | 0 | 0 | 0 | $class eq 'Net::LDAP::Control' and exists $Type2Pkg{$asn->{'type'}} | 
| line | l | !l | condition | 
|---|---|---|---|
| 94 | 0 | 0 | $oid || $Pkg2Type{$pkg} || '' | 
| line | l | !l&&r | !l&&!r | condition | 
|---|---|---|---|---|
| 90 | 0 | 4 | 0 | ref $self || $self | 
| 94 | 4 | 0 | 0 | $args{'type'} ||= $oid || $Pkg2Type{$pkg} || '' | 
| 115 | 0 | 0 | 0 | ref $self || $self |