line |
true |
false |
branch |
130
|
1 |
0 |
if (defined $$self{'userFunc'}) |
205
|
0 |
20 |
unless $open == $close |
215
|
1 |
19 |
if ($@) |
249
|
127 |
0 |
if ($_ ne '') |
251
|
127 |
0 |
if (@c) { } |
265
|
0 |
165 |
unless defined $expr |
267
|
145 |
20 |
if ($expr =~ /(.+?),(.+)/) |
270
|
8 |
137 |
if ($L =~ /^\w+$/ and $R =~ /$Acme::AlgebraicToRPN::RE{'balanced'}{join $;, -'parens', '()'}/) |
276
|
73 |
92 |
if ($expr =~ /(\w+)($Acme::AlgebraicToRPN::RE{'balanced'}{join $;, -'parens', '()'})(.*)/) |
281
|
9 |
64 |
if (defined $$self{'userFunc'} and defined $$self{'userFunc'}{$op}) |
290
|
46 |
27 |
unless $core =~ /$Acme::AlgebraicToRPN::RE{'balanced'}{join $;, -'parens', '()'}/ |
293
|
73 |
0 |
if defined $r and $r =~ /$Acme::AlgebraicToRPN::RE{'balanced'}{join $;, -'parens', '()'}/ |
295
|
0 |
73 |
if defined $r and not $r =~ /$Acme::AlgebraicToRPN::RE{'balanced'}{join $;, -'parens', '()'}/ |
315
|
11 |
8 |
unless @shouldbe == @result |
319
|
0 |
22 |
unless $sb eq $_ |