| line |
true |
false |
branch |
| 32 |
13 |
0 |
eval "require $_;" && $_->can('_secflags') ? : |
| 35 |
78 |
0 |
if $have > 0 |
| 37 |
0 |
22 |
unless my(@mpkg) = (sort {$b->_order <=> $a->_order;} grep({my $have = ($have{$_} ||= eval "require $_;" && $_->can('_secflags') ? 1 : -1);
|
| 46 |
0 |
0 |
unless defined shift(@_)->{'error'} |
| 61 |
0 |
0 |
if @_ == 1 |
| 70 |
0 |
0 |
if @_ == 1 |
| 97 |
4 |
19 |
unless defined $cb |
| 101 |
1 |
18 |
if (ref $cb eq 'ARRAY') { } |
| |
3 |
15 |
elsif (ref $cb eq 'CODE') { } |
| 113 |
13 |
6 |
unless $name eq 'pass' |