| line |
true |
false |
branch |
|
28
|
1 |
270 |
unless $self->token_type eq '0'
|
|
52
|
9 |
30 |
unless @_ > 1
|
|
69
|
0 |
2015 |
if '0' eq ($self->{'token_type'} || '')
|
|
78
|
557 |
1665 |
if ($pos1 >= length $self->{'input'})
|
|
87
|
281 |
276 |
if (not defined $type or $type eq '')
|
|
94
|
1 |
1940 |
unless defined $type
|
|
96
|
0 |
1940 |
unless $pos1 > $pos0
|
|
107
|
10 |
927 |
if $self->{'token_type'} eq '0'
|
|
116
|
0 |
2 |
if delete $args{'multiline'}
|
|
126
|
722 |
0 |
unless $self->{'token_type'} eq 'or'
|
|
138
|
715 |
7 |
unless $self->{'token_type'} eq 'and'
|
|
149
|
5 |
725 |
if ($self->{'token_type'} eq 'not' or $self->{'token_type'} eq '!')
|
|
160
|
706 |
23 |
unless $_cmp_ops{$self->{'token_type'}}
|
|
173
|
736 |
24 |
unless $self->{'token_type'} eq '+' or $self->{'token_type'} eq '-'
|
|
178
|
10 |
21 |
$negate ? :
|
|
189
|
29 |
6 |
$op eq '*' ? :
|
|
199
|
30 |
827 |
if ($self->{'token_type'} eq '-')
|
|
204
|
11 |
816 |
if ($self->{'token_type'} eq '(')
|
|
208
|
0 |
11 |
if $self->{'token_type'} ne ')'
|
|
210
|
2 |
9 |
@$args > 1 ? :
|
|
213
|
317 |
499 |
if ($self->{'token_type'} eq 'Number')
|
|
217
|
84 |
415 |
if ($self->{'token_type'} eq 'String')
|
|
221
|
414 |
1 |
if ($self->{'token_type'} eq 'Identifier')
|
|
223
|
261 |
153 |
if ($self->{'token_type'} eq '(') { }
|
|
225
|
9 |
252 |
$self->{'token_type'} eq ')' ? :
|
|
227
|
0 |
261 |
if $self->{'token_type'} ne ')'
|
|
236
|
1 |
0 |
if ($self->{'token_type'} eq '0')
|
|
274
|
0 |
6 |
$] >= 5.02 && $] < 5.020003 ? :
|
|
304
|
6 |
0 |
if ref $pkg
|
|
305
|
6 |
0 |
unless defined $method_name
|
|
308
|
6 |
30 |
$_->[3] ? :
|
|
318
|
0 |
6 |
unless eval "$code; 1"
|
|
|
210 |
2012 |
if $self->{'input'} =~ /\G(?^:(\s+))/cg
|
|
|
322 |
1690 |
if $self->{'input'} =~ /\G(?^:([0-9]*\.?[0-9]+(?:[eE][+-]?[0-9]+)?)\b)/cg
|
|
|
2 |
1688 |
if $self->{'input'} =~ /\G(?^:0x([0-9A-Fa-f]+))/cg
|
|
|
897 |
791 |
if $self->{'input'} =~ m[\G(?^u:(not|and|\>\=|\<\=|\<\>|or|\=\=|\!\=|/|\!|\+|\(|\*|\<|\-|\,|\>|\\x{2260}|\\x{2264}|\)|\\x{2265}|\=))]cg
|
|
|
425 |
366 |
if $self->{'input'} =~ /\G(?^:([A-Za-z_][A-Za-z0-9_.]*)\b)/cg
|
|
|
85 |
2 |
defined $1 ? :
|
|
|
85 |
2 |
if defined $1
|
|
|
2 |
85 |
if defined $2
|
|
|
87 |
279 |
if $self->{'input'} =~ /\G(?^:(?:"((?:[^"]|"")*)"|'((?:[^']|'')*)'))/cg
|
|
335
|
1 |
11 |
!@{$node->parameters;} ? :
|
|
391
|
35 |
5 |
if $node->can('number_value')
|
|
392
|
0 |
5 |
if $node->can('function_name') and $node->function_name eq 'negative'
|