line |
true |
false |
branch |
21
|
228 |
0 |
unless (defined $debug) |
23
|
97 |
131 |
unless (defined $substitutions) |
25
|
92 |
136 |
unless (defined $formattable) |
49
|
142 |
86 |
unless (defined $engine) |
57
|
216 |
220404 |
if (@_) |
63
|
216 |
23262 |
if (@_) |
69
|
1218 |
0 |
if (defined $c) |
77
|
1194 |
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
|
216 |
1391580 |
if (@_) |
185
|
695790 |
0 |
if (exists $self->contextdata->{$context}) { } |
187
|
506540 |
189250 |
if (exists $$c{$item}) { } |
200
|
7670 |
37968 |
if ($context =~ /^#pop/i) { } |
|
28121 |
9847 |
elsif ($context =~ /^#stay/i) { } |
|
6 |
9841 |
elsif ($context =~ /^##(.+)/) { } |
216
|
0 |
0 |
if (@_) |
222
|
0 |
0 |
if (@_) |
228
|
216 |
372502 |
if (@_) |
234
|
228 |
2318872 |
if (@_) |
242
|
196 |
38 |
if ($line =~ /^\s*$/ and $string =~ /^[^\s]/) |
250
|
0 |
55817 |
if (@_) |
261
|
222836 |
6 |
if (defined $top) { } |
263
|
11814 |
211022 |
if ($text =~ s/^(\n)//) { } |
266
|
1642 |
10172 |
if (defined $e) |
274
|
0 |
11814 |
if (defined $b) |
280
|
168698 |
42324 |
unless ($result) |
282
|
1434 |
167264 |
if (defined $f) { } |
307
|
0 |
55817 |
unless (defined $t) |
313
|
9734 |
314049 |
if (exists $$s{$k}) { } |
320
|
55817 |
0 |
if (exists $$rt{$t}) { } |
335
|
22883 |
0 |
if (defined $plug) |
338
|
22883 |
0 |
if (defined $call) { } |
350
|
81916 |
0 |
if (defined $call) { } |
360
|
260 |
172 |
if ($self->engine eq $self) |
367
|
216 |
72262 |
if (@_) |
385
|
0 |
21 |
if ($name =~ s/^(\d)//) |
402
|
24120 |
814325 |
if ($l eq '') |
409
|
309957 |
256074 |
if ($self->linestart or $self->lastchar =~ /$deliminators/) |
417
|
232204 |
1919292 |
if (@_) |
423
|
48432 |
811511 |
if ($self->linesegment eq '') |
431
|
0 |
72927 |
if (@_) |
437
|
115 |
107 |
if (@_) |
445
|
664 |
1 |
if (@_) { } |
456
|
0 |
2 |
if (defined $top) { } |
469
|
234 |
42417 |
if ($fnspace) |
470
|
38 |
196 |
unless ($eng->firstnonspace($$text)) |
474
|
280 |
42333 |
if (defined $column) |
475
|
51 |
229 |
if ($column ne $eng->column) |
479
|
41326 |
1236 |
unless ($lahead) |
482
|
8565 |
32761 |
if (not defined $attr) { } |
498
|
88 |
22916 |
unless (exists $$plugs{$language}) |
500
|
0 |
88 |
unless (defined $modname) |
506
|
86 |
2 |
if (defined $plug) { } |
512
|
23002 |
2 |
if (exists $$plugs{$language}) |
527
|
56033 |
63760 |
if (@_) |
534
|
14 |
220390 |
unless defined $ch |
536
|
220390 |
0 |
if ($ch ne '') |
544
|
40025 |
275512 |
if (@_) |
551
|
55811 |
7949 |
if ($parse ne '') |
562
|
40025 |
180379 |
if (defined $attr and $attr ne $self->snippetAttribute) |
571
|
375 |
257404 |
if (@_) |
596
|
0 |
0 |
if (Dumper($h) eq Dumper($state)) |
614
|
0 |
55817 |
if (@_) |
625
|
0 |
40942 |
if ($insensitive) |
629
|
5107 |
35835 |
if (index($string, $test) > -1) |
641
|
34 |
385734 |
if ($dyn) |
646
|
0 |
385768 |
if ($insensitive) |
650
|
9532 |
376236 |
if ($char eq $test) |
663
|
0 |
236059 |
if ($dyn) |
670
|
0 |
236059 |
if ($insensitive) |
674
|
1263 |
234796 |
if ($string eq $test) |
683
|
7380 |
21977 |
if ($$text =~ /^([a-zA-Z_][a-zA-Z0-9_]+)/) |
692
|
953 |
40353 |
if ($$text =~ /^([\\040|\\t]+)/) |
701
|
31952 |
25870 |
if ($self->engine->lastcharDeliminator) |
702
|
1845 |
30107 |
if ($$text =~ /^((?=\.?\d)\d*(?:\.\d*)?(?:[Ee][+-]?\d+)?)/) |
712
|
26 |
24966 |
if ($$text =~ /^('.')/) |
721
|
22154 |
17050 |
if ($self->engine->lastcharDeliminator) |
722
|
8 |
22146 |
if ($$text =~ /^(0x[0-9a-fA-F]+)/) |
732
|
19924 |
13442 |
if ($self->engine->lastcharDeliminator) |
733
|
0 |
19924 |
if ($$text =~ /^(0[0-7]+)/) |
743
|
34 |
4986 |
if ($$text =~ /^(\\[a|b|e|f|n|r|t|v|'|"|\?])/) |
746
|
0 |
4986 |
if ($$text =~ /^(\\x[0-9a-fA-F][0-9a-fA-F]?)/) |
749
|
0 |
4986 |
if ($$text =~ /^(\\[0-7][0-7]?[0-7]?)/) |
758
|
33237 |
29900 |
if ($self->engine->lastcharDeliminator) |
759
|
314 |
32923 |
if ($$text =~ /^([+-]?\d+)/) |
772
|
72262 |
300240 |
if ($eng->lastcharDeliminator and $$text =~ /^([^$deliminators]+)/) |
775
|
72262 |
0 |
if (defined $l) { } |
778
|
72262 |
0 |
if (not $self->keywordscase) { } |
783
|
5777 |
66485 |
if (@rl) |
797
|
0 |
6210 |
if ($lahead) { } |
798
|
0 |
0 |
if ($$text =~ /^\\\n/) |
803
|
14 |
6196 |
if ($$text =~ s/^(\\)(\n)/$2/) |
826
|
5299 |
1364600 |
if ($dynamic) |
830
|
293912 |
1075987 |
if ($reg =~ s/^\^//) { } |
|
310423 |
765564 |
elsif ($reg =~ s/^\\(b)//i) { } |
831
|
283489 |
10423 |
unless ($eng->linestart) |
836
|
309741 |
682 |
if ($1 eq 'b') { } |
837
|
130001 |
179740 |
if ($lastchar =~ /\w/) |
839
|
308 |
374 |
if ($lastchar =~ /\W/) |
850
|
0 |
956101 |
if ($@) |
854
|
127708 |
828393 |
if ($insensitive) { } |
855
|
158 |
127550 |
if ($sample =~ /$reg/gi) |
859
|
58 |
100 |
if ($#-) |
874
|
13000 |
815393 |
if ($sample =~ /$reg/g) |
878
|
1160 |
11840 |
if ($#-) |
893
|
9828 |
946273 |
if (defined $pos and $pos > 0) |
906
|
0 |
1692912 |
if ($dynamic) |
911
|
3672 |
1689240 |
if ($insensitive) |
915
|
570 |
1692342 |
if ($string eq $test) |