line |
true |
false |
branch |
74
|
37 |
40 |
if ($operators{$token}) { }
|
109
|
14 |
13 |
if (@$ops)
|
112
|
10 |
8 |
if ($prev_op->{'prio'} >= $prio) { }
|
162
|
31 |
6 |
if length $variable
|
166
|
9 |
4 |
if (length $formula)
|
170
|
2 |
75 |
$_ =~ /^[0-9]+$/ ? :
|
176
|
0 |
7 |
unless @$rpn > 1
|
189
|
0 |
8 |
unless @$rpn > 1
|
202
|
0 |
3 |
unless @$rpn > 1
|
215
|
0 |
8 |
unless @$rpn > 1
|
221
|
5 |
3 |
unless $val2
|
231
|
11 |
2 |
if (@{$self->variables;} == 0)
|
238
|
26 |
40 |
if (ref $token eq 'HASH') { }
|
241
|
5 |
21 |
if $@
|
245
|
34 |
6 |
if (exists $variables{$token}) { }
|
|
2 |
4 |
elsif ($token =~ /^[+\-]?\d*\.?\d*$/) { }
|
252
|
1 |
3 |
if (my $on_missing = $self->has_on_missing_token) { }
|
253
|
0 |
1 |
ref $on_missing eq 'CODE' ? :
|
270
|
6 |
2 |
if ($self->has_on_error) { }
|
272
|
1 |
5 |
ref $on_err eq 'CODE' ? :
|