| line |
true |
false |
branch |
|
34
|
1 |
25 |
unless @_ |
|
42
|
0 |
32 |
if ('ARRAY' eq ref $_[0]) { } |
|
|
7 |
25 |
elsif ($_[0] =~ /^-/) { } |
|
86
|
23 |
2 |
unless (defined $mopt{'import'}) |
|
91
|
2 |
21 |
if ('ARRAY' eq ref $_[0] and $_[0] and @{$_[0];} == 0) { } |
|
105
|
23 |
2 |
if ($mopt{'require'}) |
|
107
|
0 |
23 |
exists $mopt{'version'} ? : |
|
113
|
5 |
20 |
if ($mopt{'inner'}) |
|
118
|
1 |
4 |
if $mopt{'inner'} < 0 |
|
128
|
2 |
27 |
if defined $mopt{'include'} and not $pkg ~~ $mopt{'include'} |
|
129
|
0 |
27 |
if defined $mopt{'exclude'} and $pkg ~~ $mopt{'exclude'} |
|
133
|
2 |
25 |
$$opt{'alias'} ? : |
|
139
|
26 |
1 |
if ($mopt{'import'}) |
|
145
|
0 |
12 |
if $pkg ne $alias |
|
174
|
0 |
20 |
unless defined $attr |
|
179
|
0 |
20 |
if @_ < $n |
|
182
|
9 |
6 |
exists $$attr{'value'} ? : |
|
|
5 |
0 |
$n == 1 ? : |
|
|
15 |
5 |
$n == 0 ? : |
|
187
|
10 |
10 |
if ($$attr{'name'}) { } |
|
189
|
2 |
8 |
$$attr{'tag'} ? : |
|
197
|
2 |
18 |
if $$attr{'last'} |
|
208
|
1 |
1 |
if ($name eq 'alias') { } |
|
|
1 |
0 |
elsif ($name eq 'strip') { } |
|
210
|
1 |
0 |
$arg ? : |
|
215
|
0 |
1 |
'HASH' eq ref $arg ? : |
|
217
|
0 |
1 |
unless defined $attr{'pfx'} |
|
223
|
0 |
1 |
defined $attr{'sep'} ? : |
|
228
|
0 |
1 |
if $npkg eq '' |
|
249
|
0 |
0 |
@_ > 1 ? : |