| line |
true |
false |
branch |
|
13
|
137 |
6175 |
if ($self->{'lang'} and not ref $self->{'lang'} eq "ARRAY")
|
|
39
|
417 |
11715 |
if ($self->{'lang'})
|
|
43
|
278 |
139 |
unless ($l eq $lang)
|
|
44
|
0 |
278 |
if $ENV{'DFF_DEBUG'}
|
|
49
|
0 |
11854 |
if $ENV{'DFF_DEBUG'}
|
|
51
|
0 |
11854 |
if $ENV{'DFF_DEBUG'}
|
|
53
|
0 |
11854 |
if $ENV{'DFF_DEBUG'}
|
|
55
|
0 |
11854 |
if $ENV{'DFF_DEBUG'}
|
|
57
|
0 |
11854 |
if $ENV{'DFF_DEBUG'}
|
|
59
|
0 |
11854 |
if $ENV{'DFF_DEBUG'}
|
|
61
|
0 |
11854 |
if $ENV{'DFF_DEBUG'}
|
|
63
|
0 |
11854 |
if $ENV{'DFF_DEBUG'}
|
|
65
|
0 |
11854 |
if $ENV{'DFF_DEBUG'}
|
|
67
|
0 |
11854 |
if $ENV{'DFF_DEBUG'}
|
|
78
|
5 |
99269 |
if ($date =~ /$orig_tz/mix)
|
|
82
|
29 |
99240 |
if (exists $p->{'time_zone'} and $p->{'time_zone'} eq $orig_tz)
|
|
118
|
0 |
47416 |
unless exists $instructions->{$keyword}
|
|
123
|
101 |
47315 |
if ($date =~ /$rx/mix)
|
|
126
|
24 |
77 |
if ($has_units) { }
|
|
137
|
29 |
1126 |
if ($date =~ /$day/mix)
|
|
146
|
48 |
876 |
if ($date =~ /$month/mix)
|
|
153
|
0 |
101 |
if $ENV{'DFF_DEBUG'}
|
|
158
|
0 |
101 |
if $ENV{'DFF_DEBUG'}
|
|
171
|
21 |
3 |
if (my($amount, $unit) = $date =~ /(\d+)\s+([^\s]+)/mx)
|
|
173
|
0 |
21 |
if $ENV{'DFF_DEBUG'}
|
|
174
|
21 |
0 |
if (exists $strings{$unit})
|
|
178
|
13 |
8 |
if ($direction eq "past")
|
|
182
|
8 |
13 |
if ($direction eq "future")
|
|
188
|
0 |
21 |
if ($ENV{'DFF_DEBUG'})
|
|
209
|
14 |
15 |
if ($direction eq "past")
|
|
212
|
12 |
2 |
if ($amount < 1)
|
|
213
|
0 |
14 |
if $ENV{'DFF_DEBUG'}
|
|
219
|
15 |
14 |
if ($direction eq "future")
|
|
222
|
4 |
11 |
if ($amount < 1)
|
|
223
|
0 |
15 |
if $ENV{'DFF_DEBUG'}
|
|
243
|
0 |
48 |
if $ENV{'DFF_DEBUG'}
|
|
246
|
15 |
33 |
if ($direction eq "past" and $date_mon >= $mon)
|
|
250
|
11 |
37 |
if ($direction eq "future" and $date_mon <= $mon)
|
|
255
|
0 |
48 |
if $ENV{'DFF_DEBUG'}
|
|
268
|
45 |
102736 |
if ($date =~ /\Q$key\E/mix)
|
|
278
|
8 |
442773 |
if (index(lc $date, lc $key) != -1)
|
|
295
|
2409 |
141511 |
if ($date =~ /\b$month_name\b/mix) { }
|
|
|
11 |
141500 |
elsif ($date =~ /\d$month_name/mix) { }
|
|
|
4 |
141496 |
elsif ($date =~ /\b$month_name\d.*\b/mix) { }
|
|
332
|
16 |
144750 |
if (lc $date eq lc $day_name or (index(lc $date, lc($day_name) . ' at') != -1))
|
|
337
|
2 |
14 |
if ($date_dow == $dt->dow) { }
|
|
|
12 |
2 |
elsif ($date_dow > $dt->dow) { }
|
|
359
|
234 |
144516 |
if ($date =~ /\b$day_name\b/mix)
|
|
378
|
29 |
209 |
if (lc $key eq lc $day)
|
|
394
|
34 |
79790 |
if ($date =~ /$hour/mix)
|
|
411
|
162 |
27590 |
if ($date =~ /$rs/mix)
|
|
413
|
0 |
162 |
if $ENV{'DFF_DEBUG'}
|