| line |
true |
false |
branch |
|
15
|
0 |
2 |
if @_ < 2 |
|
|
0 |
2 |
if @_ > 2 |
|
16
|
0 |
2 |
unless exists $self->constants->{$key} |
|
21
|
0 |
3 |
if @_ < 3 |
|
|
0 |
3 |
if @_ > 3 |
|
22
|
0 |
3 |
if $key =~ /\s/u or $key =~ /^\s*\d/u |
|
24
|
0 |
3 |
if (exists $self->constants->{$key} and defined(my $eval = $self->constants->{$key})) |
|
28
|
0 |
3 |
unless defined $value |
|
29
|
0 |
3 |
if $value =~ /[^xob\d\-+_]/iu |
|
34
|
0 |
7 |
if @_ < 2 |
|
|
0 |
7 |
if @_ > 2 |
|
52
|
0 |
1 |
if @_ < 1 |
|
|
0 |
1 |
if @_ > 1 and (@_ - 1) % 2 |
|
62
|
0 |
2 |
if @_ < 1 |
|
|
0 |
2 |
if @_ > 1 |
|
66
|
0 |
20 |
if @_ < 1 |
|
|
0 |
20 |
if @_ > 1 |
|
77
|
0 |
11 |
if @_ < 1 |
|
|
0 |
11 |
if @_ > 1 |
|
89
|
0 |
28 |
if @_ < 1 |
|
|
0 |
28 |
if @_ > 1 |
|
99
|
0 |
22 |
if @_ < 1 |
|
|
0 |
22 |
if @_ > 1 |
|
108
|
0 |
22 |
if @_ < 1 |
|
|
0 |
22 |
if @_ > 1 |
|
114
|
0 |
4 |
if @_ < 1 |
|
|
0 |
4 |
if @_ > 1 |
|
119
|
0 |
6 |
if @_ < 1 |
|
|
0 |
6 |
if @_ > 1 |
|
122
|
4 |
2 |
if ($val =~ /^0/u) { } |