| line |
true |
false |
branch |
|
21
|
2 |
46 |
if _check_key($self, $key)
|
|
23
|
12 |
34 |
unless ($self->{$key} =~ /^\-?\d+$/ms)
|
|
36
|
2 |
46 |
if _check_key($self, $key)
|
|
38
|
18 |
28 |
unless ($self->{$key} =~ /^\d+$/ms)
|
|
51
|
2 |
16 |
if _check_key($self, $key)
|
|
53
|
2 |
14 |
unless (&looks_like_number($self->{$key}))
|
|
65
|
2 |
14 |
if _check_key($self, $key)
|
|
75
|
2 |
24 |
if _check_key($self, $key)
|
|
77
|
10 |
14 |
if (not $self->{$key} =~ /^\d+(?:\.\d+)?(?:[eE][+-]?\d+)?$/ms or $self->{$key} == 0)
|
|
90
|
2 |
14 |
if _check_key($self, $key)
|
|
92
|
7 |
7 |
if (not $self->{$key} =~ /^\d+$/ms or $self->{$key} == 0)
|
|
104
|
12 |
160 |
unless (exists $self->{$key} and defined $self->{$key})
|