| line |
true |
false |
branch |
|
114
|
0 |
46 |
unless @_ == 1 or @_ == 2 |
|
120
|
42 |
4 |
unless $lang >= 1 and $lang <= Languages() |
|
121
|
22 |
24 |
if ($buffer =~ /^\D* (\d+) [^A-Za-z0-9\xC0-\xD6\xD8-\xF6\xF8-\xFF]* ([A-Za-z\xC0-\xD6\xD8-\xF6\xF8-\xFF]+) [^A-Za-z0-9\xC0-\xD6\xD8-\xF6\xF8-\xFF]* (\d+) \D*$/x) { } |
|
|
19 |
5 |
elsif ($buffer =~ /^\D* 0*(\d+) \D*$/x) { } |
|
|
3 |
2 |
elsif ($buffer =~ /^\D* (\d+) \D+ (\d+) \D+ (\d+) \D*$/x) { } |
|
125
|
1 |
21 |
unless ($month > 0) |
|
134
|
3 |
16 |
if ($length == 3) { } |
|
|
3 |
13 |
elsif ($length == 4) { } |
|
|
3 |
10 |
elsif ($length == 5) { } |
|
|
3 |
7 |
elsif ($length == 6) { } |
|
|
3 |
4 |
elsif ($length == 7) { } |
|
|
3 |
1 |
elsif ($length == 8) { } |
|
178
|
40 |
2 |
if (check_date($year, $month, $day)) { } |
|
187
|
0 |
46 |
unless @_ == 1 or @_ == 2 |
|
193
|
42 |
4 |
unless $lang >= 1 and $lang <= Languages() |
|
194
|
14 |
32 |
if ($buffer =~ /^[^A-Za-z0-9\xC0-\xD6\xD8-\xF6\xF8-\xFF]* ([A-Za-z\xC0-\xD6\xD8-\xF6\xF8-\xFF]+) [^A-Za-z0-9\xC0-\xD6\xD8-\xF6\xF8-\xFF]* 0*(\d+) \D*$/x) { } |
|
|
8 |
24 |
elsif ($buffer =~ /^[^A-Za-z0-9\xC0-\xD6\xD8-\xF6\xF8-\xFF]* ([A-Za-z\xC0-\xD6\xD8-\xF6\xF8-\xFF]+) [^A-Za-z0-9\xC0-\xD6\xD8-\xF6\xF8-\xFF]* (\d+) \D+ (\d+) \D*$/x) { } |
|
|
19 |
5 |
elsif ($buffer =~ /^\D* 0*(\d+) \D*$/x) { } |
|
|
3 |
2 |
elsif ($buffer =~ /^\D* (\d+) \D+ (\d+) \D+ (\d+) \D*$/x) { } |
|
198
|
0 |
14 |
unless ($month > 0) |
|
203
|
0 |
14 |
if ($length == 2) { } |
|
|
3 |
11 |
elsif ($length == 3) { } |
|
|
4 |
7 |
elsif ($length == 4) { } |
|
|
3 |
4 |
elsif ($length == 5) { } |
|
|
4 |
0 |
elsif ($length == 6) { } |
|
234
|
1 |
7 |
unless ($month > 0) |
|
243
|
3 |
16 |
if ($length == 3) { } |
|
|
3 |
13 |
elsif ($length == 4) { } |
|
|
3 |
10 |
elsif ($length == 5) { } |
|
|
3 |
7 |
elsif ($length == 6) { } |
|
|
3 |
4 |
elsif ($length == 7) { } |
|
|
3 |
1 |
elsif ($length == 8) { } |
|
287
|
40 |
2 |
if (check_date($year, $month, $day)) { } |
|
296
|
0 |
15 |
unless @_ == 1 or @_ == 2 |
|
302
|
11 |
4 |
unless $lang >= 1 and $lang <= Languages() |
|
303
|
1 |
14 |
unless ($date =~ /\b([\x41-\x5A\x61-\x7A\xC0-\xD6\xD8-\xF6\xF8-\xFF]{3})\s+([0123]??\d)\b/) |
|
309
|
1 |
13 |
unless ($date =~ /\b(19\d\d|20\d\d)\b/) |
|
315
|
0 |
13 |
unless ($month > 0) |
|
319
|
1 |
12 |
unless (check_date($year, $month, $day)) |