line |
true |
false |
branch |
21
|
231 |
0 |
unless (defined $debug) |
23
|
100 |
131 |
unless (defined $substitutions) |
25
|
94 |
137 |
unless (defined $formattable) |
49
|
143 |
88 |
unless (defined $engine) |
57
|
218 |
220497 |
if (@_) |
63
|
218 |
23286 |
if (@_) |
69
|
1219 |
0 |
if (defined $c) |
77
|
1195 |
24 |
if (@o) |
86
|
5333 |
0 |
if (defined $s->[1]) { } |
89
|
5333 |
0 |
if (defined $c) { } |
90
|
5333 |
0 |
if (defined $c->[$num]) { } |
146
|
34 |
5299 |
if (defined $mode) { } |
147
|
34 |
0 |
if ($string =~ s/^(\d)//) |
149
|
0 |
34 |
if ($string ne '') |
155
|
5299 |
10439 |
if ($string =~ s/^([^\%]*)\%(\d)//) { } |
157
|
5299 |
0 |
if ($r ne '') { } |
179
|
218 |
1392098 |
if (@_) |
185
|
696049 |
0 |
if (exists $self->contextdata->{$context}) { } |
187
|
506731 |
189318 |
if (exists $c->{$item}) { } |
200
|
7675 |
38004 |
if ($context =~ /^#pop/i) { } |
|
28152 |
9852 |
elsif ($context =~ /^#stay/i) { } |
|
6 |
9846 |
elsif ($context =~ /^##(.+)/) { } |
216
|
0 |
0 |
if (@_) |
222
|
0 |
0 |
if (@_) |
228
|
218 |
372563 |
if (@_) |
234
|
231 |
2319220 |
if (@_) |
242
|
196 |
38 |
if ($line =~ /^\s*$/ and $string =~ /^[^\s]/) |
250
|
0 |
55847 |
if (@_) |
261
|
222931 |
6 |
if (defined $top) { } |
263
|
11828 |
211103 |
if ($text =~ s/^(\n)//) { } |
266
|
1643 |
10185 |
if (defined $e) |
274
|
0 |
11828 |
if (defined $b) |
280
|
168740 |
42363 |
unless ($result) |
282
|
1435 |
167305 |
if (defined $f) { } |
307
|
0 |
55847 |
unless (defined $t) |
313
|
9734 |
314296 |
if (exists $s->{$k}) { } |
320
|
55847 |
0 |
if (exists $rt->{$t}) { } |
335
|
22906 |
0 |
if (defined $plug) |
338
|
22906 |
0 |
if (defined $call) { } |
350
|
81919 |
0 |
if (defined $call) { } |
360
|
260 |
176 |
if ($self->engine eq $self) |
367
|
218 |
72284 |
if (@_) |
385
|
0 |
21 |
if ($name =~ s/^(\d)//) |
402
|
24123 |
814432 |
if ($l eq '') |
409
|
310009 |
256111 |
if ($self->linestart or $self->lastchar =~ /$deliminators/) |
417
|
232311 |
1919599 |
if (@_) |
423
|
48445 |
811598 |
if ($self->linesegment eq '') |
431
|
0 |
72954 |
if (@_) |
437
|
116 |
108 |
if (@_) |
445
|
669 |
1 |
if (@_) { } |
456
|
0 |
2 |
if (defined $top) { } |
469
|
234 |
42456 |
if ($fnspace) |
470
|
38 |
196 |
unless ($eng->firstnonspace($$text)) |
474
|
284 |
42368 |
if (defined $column) |
475
|
51 |
233 |
if ($column ne $eng->column) |
479
|
41364 |
1237 |
unless ($lahead) |
482
|
32772 |
8592 |
if (defined $attr) { } |
498
|
90 |
22938 |
unless (exists $plugs->{$language}) |
501
|
88 |
2 |
if (defined $lang_plug) |
504
|
0 |
90 |
unless (defined $modname) |
510
|
88 |
2 |
if (defined $plug) { } |
516
|
23026 |
2 |
if (exists $plugs->{$language}) |
531
|
56065 |
63803 |
if (@_) |
538
|
14 |
220483 |
unless defined $ch |
540
|
220483 |
0 |
if ($ch ne '') |
548
|
40039 |
275635 |
if (@_) |
555
|
55841 |
7962 |
if ($parse ne '') |
566
|
40039 |
180458 |
if (defined $attr and $attr ne $self->snippetAttribute) |
575
|
376 |
257538 |
if (@_) |
600
|
0 |
0 |
if (Dumper($h) eq Dumper($state)) |
618
|
0 |
55847 |
if (@_) |
629
|
0 |
40943 |
if ($insensitive) |
633
|
5108 |
35835 |
if (index($string, $test) > -1) |
645
|
34 |
385782 |
if ($dyn) |
650
|
0 |
385816 |
if ($insensitive) |
654
|
9535 |
376281 |
if ($char eq $test) |
667
|
0 |
236078 |
if ($dyn) |
674
|
0 |
236078 |
if ($insensitive) |
678
|
1263 |
234815 |
if ($string eq $test) |
687
|
7405 |
22017 |
if ($$text =~ /^([a-zA-Z_][a-zA-Z0-9_]+)/) |
696
|
955 |
40420 |
if ($$text =~ /^([\\040|\\t]+)/) |
705
|
31956 |
25873 |
if ($self->engine->lastcharDeliminator) |
706
|
1845 |
30111 |
if ($$text =~ /^((?=\.?\d)\d*(?:\.\d*)?(?:[Ee][+-]?\d+)?)/) |
716
|
26 |
24966 |
if ($$text =~ /^('.')/) |
725
|
22158 |
17053 |
if ($self->engine->lastcharDeliminator) |
726
|
8 |
22150 |
if ($$text =~ /^(0x[0-9a-fA-F]+)/) |
736
|
19928 |
13445 |
if ($self->engine->lastcharDeliminator) |
737
|
0 |
19928 |
if ($$text =~ /^(0[0-7]+)/) |
747
|
34 |
4986 |
if ($$text =~ /^(\\[a|b|e|f|n|r|t|v|'|"|\?])/) |
750
|
0 |
4986 |
if ($$text =~ /^(\\x[0-9a-fA-F][0-9a-fA-F]?)/) |
753
|
0 |
4986 |
if ($$text =~ /^(\\[0-7][0-7]?[0-7]?)/) |
762
|
33241 |
29903 |
if ($self->engine->lastcharDeliminator) |
763
|
314 |
32927 |
if ($$text =~ /^([+-]?\d+)/) |
776
|
72284 |
300279 |
if ($eng->lastcharDeliminator and $$text =~ /^([^$deliminators]+)/) |
779
|
72284 |
0 |
if (defined $l) { } |
782
|
0 |
72284 |
if ($self->keywordscase) { } |
787
|
5778 |
66506 |
if (@rl) |
801
|
0 |
6210 |
if ($lahead) { } |
802
|
0 |
0 |
if ($$text =~ /^\\\n/) |
807
|
14 |
6196 |
if ($$text =~ s/^(\\)(\n)/$2/) |
830
|
5299 |
1364762 |
if ($dynamic) |
834
|
293923 |
1076138 |
if ($reg =~ s/^\^//) { } |
|
310453 |
765685 |
elsif ($reg =~ s/^\\(b)//i) { } |
835
|
283496 |
10427 |
unless ($eng->linestart) |
840
|
309771 |
682 |
if ($1 eq 'b') { } |
841
|
130011 |
179760 |
if ($lastchar =~ /\w/) |
843
|
308 |
374 |
if ($lastchar =~ /\W/) |
854
|
0 |
956246 |
if ($@) |
858
|
127708 |
828538 |
if ($insensitive) { } |
859
|
158 |
127550 |
if ($sample =~ /$reg/gi) |
863
|
58 |
100 |
if ($#-) |
878
|
13007 |
815531 |
if ($sample =~ /$reg/g) |
882
|
1161 |
11846 |
if ($#-) |
897
|
9835 |
946411 |
if (defined $pos and $pos > 0) |
910
|
0 |
1692932 |
if ($dynamic) |
915
|
3672 |
1689260 |
if ($insensitive) |
919
|
570 |
1692362 |
if ($string eq $test) |