| line |
true |
false |
branch |
|
46
|
0 |
0 |
unless defined $bless |
|
71
|
0 |
0 |
if ($rule eq '|') { } |
|
|
0 |
0 |
elsif ($rule eq '&') { } |
|
|
0 |
0 |
elsif ($rule =~ /^(.*)\s+=\s+(.*)$/ or $rule =~ /^(.*)\s+==\s+(.*)$/ or $rule =~ /^(.*)\s+eq\s+(.*)$/i) { } |
|
|
0 |
0 |
elsif ($rule =~ /^(.*)\s+!=\s+(.*)$/ or $rule =~ /^(.*)\s+<>\s+(.*)$/ or $rule =~ /^(.*)\s+ne\s+(.*)$/i) { } |
|
|
0 |
0 |
elsif ($rule =~ /^(.*)\s+>\s+(.*)$/ or $rule =~ /^(.*)\s+gt\s+(.*)$/) { } |
|
|
0 |
0 |
elsif ($rule =~ /^(.*)\s+<\s+(.*)$/ or $rule =~ /^(.*)\s+lt\s+(.*)$/) { } |
|
|
0 |
0 |
elsif ($rule =~ /^(.*)\s+>=\s+(.*)$/ or $rule =~ /^(.*)\s+ge\s+(.*)$/) { } |
|
|
0 |
0 |
elsif ($rule =~ /^(.*)\s+<=\s+(.*)$/ or $rule =~ /^(.*)\s+le\s+(.*)$/) { } |
|
91
|
0 |
0 |
$is_code ? : |
|
95
|
0 |
0 |
$is_code ? : |
|
99
|
0 |
0 |
$is_code ? : |
|
103
|
0 |
0 |
$is_code ? : |
|
107
|
0 |
0 |
$is_code ? : |
|
111
|
0 |
0 |
$is_code ? : |
|
118
|
0 |
0 |
$is_code ? : |
|
123
|
0 |
0 |
if $rc |
|
141
|
7 |
35 |
if ($rule eq '|') { } |
|
|
9 |
26 |
elsif ($rule eq '&') { } |
|
145
|
6 |
1 |
$ix + 1 >= @{$array;} ? : |
|
179
|
0 |
10 |
if ($txt =~ /^(and|or|\&\&|\|\|)/ or $txt =~ /^\s+(and|or|\&\&|\|\|)/ or $txt =~ /(and|or|\&\&|\|\|)$/ or $txt =~ /(and|or|\&\&|\|\|)\s+$/) { } |
|
200
|
1 |
47 |
if ($txt =~ /^\((.*)/) { } |
|
|
1 |
46 |
elsif ($txt =~ /^\)(.*)/) { } |
|
207
|
0 |
0 |
length $a1 < length $a2 ? : |
|
|
0 |
46 |
if ($a1 and $a2) { } |
|
|
0 |
46 |
elsif ($b2) { } |
|
|
36 |
10 |
elsif ($b1) { } |
|
212
|
1 |
45 |
if $tmp =~ /(.*)\)$/ |
|
213
|
16 |
30 |
if ($tmp =~ /(^and|^or|^\&\&|^\|\|)/) { } |
|
223
|
0 |
10 |
if ($Math::Notation::PostfixInfix{'square'} > 0) |
|
247
|
8 |
8 |
if ($oper =~ /^and$/i) { } |
|
|
1 |
7 |
elsif ($oper =~ /^\&\&$/i) { } |
|
|
6 |
1 |
elsif ($oper =~ /^or$/i) { } |
|
|
1 |
0 |
elsif ($oper =~ /^\|\|$/i) { } |
|
253
|
3 |
13 |
if ($no and $Math::Notation::PostfixInfix{'operand'}{$Math::Notation::PostfixInfix{'square'}}[$no - 1] eq "&") |
|
270
|
42 |
4 |
if ($Math::Notation::PostfixInfix{'last'} or @{$Math::Notation::PostfixInfix{'polish'};} == 0) { } |
|
300
|
0 |
1 |
if ($Math::Notation::PostfixInfix{'square'} < 0) |