| line |
true |
false |
branch |
|
20
|
9 |
5 |
defined $_[2] && XXX ? : |
|
27
|
1 |
13 |
defined $config{'prefix'} ? : |
|
29
|
1 |
13 |
unless $config{'rev'} =~ /^(int|str|dualvar)$/ |
|
32
|
0 |
13 |
unless $config{'casing'} =~ /^(upper|keep)$/ |
|
39
|
11 |
29 |
if (XXX) { } |
|
|
28 |
1 |
elsif (not XXX) { } |
|
42
|
1 |
10 |
if (@$value % 2) { } |
|
50
|
7 |
4 |
unless delete $opt{'alias'} |
|
51
|
1 |
10 |
if %opt |
|
62
|
2 |
36 |
if ($index < 0) |
|
67
|
10 |
28 |
if (my $packages = $config{'package'}) |
|
69
|
2 |
8 |
XXX ? : |
|
73
|
14 |
2 |
$config{'casing'} eq 'upper' ? : |
|
79
|
1 |
37 |
if exists $str_lookup{$name} |
|
81
|
36 |
1 |
unless exists $int_lookup{$index} |
|
88
|
1 |
9 |
if (defined $config{'maps'}) |
|
90
|
1 |
0 |
if (XXX) { } |
|
105
|
4 |
8 |
exists $int_lookup{$_[0]} ? : |
|
|
20 |
12 |
exists $str_lookup{$_[0]} ? : |
|
111
|
8 |
2 |
if ($config{'rev'} eq 'str') { } |
|
|
1 |
1 |
elsif ($config{'rev'} eq 'dualvar') { } |
|
115
|
10 |
6 |
exists $int_lookup{$_[0]} ? : |
|
123
|
3 |
1 |
exists $int_lookup{$_[0]} ? : |