line |
true |
false |
branch |
38
|
2 |
2 |
unless (exists ${$hrefB;}{$_}) |
47
|
8 |
10 |
if (exists ${$hrefA;}{$_}) |
54
|
0 |
2 |
defined $debug ? : |
55
|
0 |
2 |
if ($debug) |
63
|
1 |
3 |
unless (exists ${$hrefB;}{$_}) |
66
|
0 |
3 |
unless (exists ${$hrefA;}{$_}) |
75
|
0 |
14 |
defined $ARGV[0] && $ARGV[0] ? : |
76
|
0 |
14 |
if $debug |
77
|
14 |
0 |
unless (defined $remainder) |
88
|
0 |
14 |
if $debug |
91
|
0 |
14 |
if $debug |
97
|
2 |
32 |
unless ($remainder =~ /^\s*(\w+)\s*/) |
99
|
0 |
2 |
if $debug |
104
|
0 |
32 |
if $debug |
106
|
9 |
23 |
unless ($remainder) |
111
|
0 |
57 |
if $debug |
113
|
0 |
57 |
if $debug |
114
|
22 |
35 |
if ($remainder =~ /$regexpr/) |
123
|
1 |
22 |
unless ($operator_found) |
125
|
0 |
1 |
if $debug |
129
|
0 |
22 |
if $debug |
131
|
2 |
20 |
unless ($remainder) |
133
|
0 |
2 |
if $debug |
142
|
0 |
9 |
if $debug |
147
|
0 |
27 |
if $debug |
148
|
2 |
25 |
if ($remainder =~ /$regexpr/) |
150
|
0 |
2 |
if $debug |
157
|
0 |
26 |
if $debug |
160
|
0 |
26 |
unless (defined $remainder) |
161
|
0 |
26 |
if $debug |
162
|
13 |
13 |
if ($& =~ /\(/) { } |
166
|
2 |
11 |
if ($parentheses_cnt < 0) |
168
|
0 |
2 |
if $debug |
174
|
2 |
3 |
if ($parentheses_cnt) |
176
|
0 |
2 |
if $debug |
188
|
0 |
12 |
unless (defined $curr_formula) |
190
|
0 |
12 |
defined $debug && $debug ? : |
191
|
0 |
12 |
if $debug |
193
|
0 |
12 |
if $debug |
207
|
0 |
6 |
if $debug |
209
|
2 |
4 |
unless (defined &formula_calcul($1, $href_result, $href_HoH_sets, $debug)) |
210
|
0 |
2 |
if $debug |
215
|
0 |
4 |
unless (exists $$href_HoH_sets{$new_name}) |
219
|
0 |
4 |
if $debug |
224
|
10 |
0 |
if ($curr_formula =~ /(\w+)\s*(\S+)\s*(\w+)/) |
230
|
0 |
10 |
unless ($operator =~ /^(\+|\-|\^)$/) |
231
|
0 |
0 |
if $debug |
233
|
0 |
10 |
if $debug |
235
|
2 |
8 |
unless (exists $$href_HoH_sets{$href_operand_left}) |
237
|
0 |
2 |
if $debug |
241
|
0 |
8 |
unless (exists $$href_HoH_sets{$href_operand_right}) |
243
|
0 |
0 |
if $debug |
247
|
0 |
8 |
if ($debug) |
262
|
0 |
8 |
if ($debug) |
269
|
2 |
6 |
if ($href_remainder =~ /\S/) |
274
|
0 |
2 |
unless (exists $$href_HoH_sets{$new_name}) |
278
|
0 |
2 |
if $debug |
279
|
2 |
0 |
if (defined &formula_calcul($curr_formula, $href_result, $href_HoH_sets, $debug)) { } |
281
|
0 |
0 |
if $debug |