| line |
true |
false |
branch |
|
32
|
0 |
1 |
unless open my $fh, '<:encoding(utf-8)', $filename |
|
51
|
316 |
113 |
if pos $_ |
|
58
|
57 |
372 |
if ($state == 0 and /\b(translate|maketext|gettext|__?|loc(?:ali[sz]e)?|l|x)/cg) |
|
59
|
59 |
313 |
if $state == 1 and /^([\s\t\n]*)/cg |
|
64
|
43 |
14 |
$1 eq '(' ? : |
|
|
57 |
256 |
if ($state == 1 and /^([\S\(])\s*/cg) |
|
70
|
0 |
129 |
if ($state == 2 and defined $str and /^(\s*\.\s*)/cg) |
|
73
|
42 |
214 |
if ($state == 2 and defined $str_part) |
|
74
|
18 |
24 |
if ($quo == 3 or $quo == 7) { } |
|
|
23 |
1 |
elsif ($quo != 8) { } |
|
75
|
18 |
0 |
if $str_part |
|
79
|
22 |
1 |
if $str_part |
|
89
|
12 |
202 |
if ($state == 2 and /^(\')/cg) |
|
90
|
20 |
182 |
if ($state == 3 and /^([^'\\]+)/cg) |
|
91
|
8 |
174 |
if ($state == 3 and /^((?:\\.)+)/cgs) |
|
92
|
12 |
162 |
if ($state == 3 and /^\'/cg) |
|
94
|
18 |
144 |
if ($state == 2 and /^\"/cg) |
|
95
|
26 |
118 |
if ($state == 4 and /^([^"\\]+)/cg) |
|
96
|
10 |
108 |
if ($state == 4 and /^((?:\\.)+)/cgs) |
|
97
|
18 |
90 |
if ($state == 4 and /^\"/cg) |
|
99
|
0 |
90 |
if ($state == 2 and /^\`/cg) |
|
100
|
0 |
90 |
if ($state == 5 and /^([^\`]*)/cg) |
|
101
|
0 |
90 |
if ($state == 5 and /^\`/cg) |
|
103
|
1 |
89 |
if ($state == 2 and /^qq\{/cg) |
|
104
|
2 |
87 |
if ($state == 6 and /^([^\}]*)/cg) |
|
105
|
1 |
86 |
if ($state == 6 and /^\}/cg) |
|
107
|
6 |
80 |
if ($state == 2 and /^q\{/cg) |
|
108
|
12 |
68 |
if ($state == 7 and /^([^\}]*)/cg) |
|
109
|
6 |
62 |
if ($state == 7 and /^\}/cg) |
|
115
|
1 |
61 |
if ($state == 2 and /^<<\s*\'/cg) |
|
116
|
1 |
60 |
if ($state == 8 and /^([^'\\\n]+)/cg) |
|
117
|
0 |
60 |
if ($state == 8 and /^((?:\\.)+)/cg) |
|
120
|
1 |
59 |
if ($state == 8 and /^\'/cg) |
|
124
|
2 |
57 |
if ($state == 2 and /^<<\s*\"/cg) |
|
125
|
1 |
56 |
if ($state == 9 and /^([^"\\\n]+)/cg) |
|
126
|
0 |
56 |
if ($state == 9 and /^((?:\\.)+)/cg) |
|
129
|
2 |
54 |
if ($state == 9 and /^\"/cg) |
|
133
|
3 |
51 |
if ($state == 2 and /^<<(\w*)/cg) |
|
140
|
6 |
0 |
if ($state == 10 and /^.*\r?\n/cg and s/\G(.*?\r?\n)$heredoc(\r?\n)//s) |
|
145
|
43 |
2 |
if ($state == 2 and /^\s*[\)]/cg) |
|
147
|
1 |
42 |
if $vars |
|
149
|
41 |
2 |
if ($str) |
|
160
|
1 |
1 |
if ($state == 2 and /^([^\)]*)/cg) |