| line |
true |
false |
branch |
|
21
|
2 |
0 |
unless eval {
do {
require List::MoreUtils;
'List::MoreUtils'->import('uniq');
1
}
} |
|
41
|
1 |
0 |
/\A[:-](\w*)\z/ ? : |
|
|
8 |
1 |
/\A[\$\@\%][^\W0-9]\w*\z/ ? : |
|
60
|
0 |
1 |
unless $$inject{':default'} or $$inject{':all'} |
|
|
1 |
3 |
unless @_ |
|
61
|
0 |
2 |
unless $$inject{":$1"} |
|
63
|
2 |
7 |
/\A[:-](\w*)\z/ ? : |
|
67
|
0 |
12 |
unless $$inject{$_} |
|
79
|
0 |
4 |
if ($var =~ /\A[\@\%]/ and defined $value and not ref $value) |
|
84
|
4 |
4 |
unless (ref $value) |
|
86
|
2 |
2 |
defined $value ? : |
|
93
|
4 |
0 |
if (ref $value eq 'CODE') |
|
115
|
1 |
0 |
if ref $value eq 'ARRAY' |