Branch Coverage

blib/lib/Math/Notation/PostfixInfix.pm
Criterion Covered Total %
branch 32 74 43.2


line true false branch
44 0 0 unless defined $bless
69 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+(.*)$/) { }
89 0 0 $is_code ? :
93 0 0 $is_code ? :
97 0 0 $is_code ? :
101 0 0 $is_code ? :
105 0 0 $is_code ? :
109 0 0 $is_code ? :
116 0 0 $is_code ? :
121 0 0 if $rc
139 7 35 if ($rule eq '|') { }
9 26 elsif ($rule eq '&') { }
143 6 1 $ix + 1 >= @{$array;} ? :
177 0 10 if ($txt =~ /^(and|or|\&\&|\|\|)/ or $txt =~ /^\s+(and|or|\&\&|\|\|)/ or $txt =~ /(and|or|\&\&|\|\|)$/ or $txt =~ /(and|or|\&\&|\|\|)\s+$/) { }
198 1 47 if ($txt =~ /^\((.*)/) { }
1 46 elsif ($txt =~ /^\)(.*)/) { }
205 0 0 length $a1 < length $a2 ? :
0 46 if ($a1 and $a2) { }
0 46 elsif ($b2) { }
36 10 elsif ($b1) { }
210 1 45 if $tmp =~ /(.*)\)$/
211 16 30 if ($tmp =~ /(^and|^or|^\&\&|^\|\|)/) { }
221 0 10 if ($Math::Notation::PostfixInfix{'square'} > 0)
245 8 8 if ($oper =~ /^and$/i) { }
1 7 elsif ($oper =~ /^\&\&$/i) { }
6 1 elsif ($oper =~ /^or$/i) { }
1 0 elsif ($oper =~ /^\|\|$/i) { }
251 3 13 if ($no and $Math::Notation::PostfixInfix{'operand'}{$Math::Notation::PostfixInfix{'square'}}[$no - 1] eq "&")
268 42 4 if ($Math::Notation::PostfixInfix{'last'} or @{$Math::Notation::PostfixInfix{'polish'};} == 0) { }
298 0 1 if ($Math::Notation::PostfixInfix{'square'} < 0)