| line |
true |
false |
branch |
|
150
|
29 |
21 |
@_ < 2 || ref $_[1] eq 'HASH' ? :
|
|
191
|
79 |
17 |
unless ref $_[0] eq 'HASH'
|
|
192
|
55 |
41 |
unless ref $_[0] eq 'HASH'
|
|
193
|
78 |
18 |
if ref $_[0] eq 'HASH'
|
|
195
|
23 |
73 |
unless $format1
|
|
196
|
53 |
43 |
unless $format2
|
|
198
|
1 |
95 |
if _setargs($usrhash, $format1)
|
|
210
|
1000 |
186 |
unless ($Settings{'exclude'}{'days'}[$nowdow] or $Settings{'exclude'}{'months'}[$nowmon])
|
|
216
|
994 |
6 |
unless $Settings{'holidays'}{$fdate}
|
|
220
|
47 |
1548 |
if compare_dates($Settings{'nowdate'}, $Settings{'enddate'}) == 0
|
|
241
|
1 |
50 |
unless $hash
|
|
248
|
307 |
201 |
if ($wantarray) { }
|
|
256
|
29 |
21 |
if $wantarray
|
|
273
|
1 |
45 |
unless $hash
|
|
287
|
18 |
3 |
if @{$Settings{'selected'};} and $hash->{$key}[0] == $Settings{'selected'}[0] and $hash->{$key}[1] == $Settings{'selected'}[1] and $hash->{$key}[2] == $Settings{'selected'}[2]
|
|
295
|
18 |
468 |
if $selected
|
|
322
|
18 |
91 |
unless $hash
|
|
327
|
66 |
285 |
if (lc $key1 eq 'exclude') { }
|
|
|
39 |
246 |
elsif (lc $key1 eq 'select') { }
|
|
|
89 |
157 |
elsif (lc $key1 eq 'start') { }
|
|
|
76 |
81 |
elsif (lc $key1 eq 'end') { }
|
|
|
34 |
47 |
elsif (lc $key1 eq 'options') { }
|
|
|
46 |
1 |
elsif (lc $key1 eq 'name') { }
|
|
332
|
92 |
55 |
if (defined $inx) { }
|
|
|
19 |
36 |
elsif ($inx = $months{lc $key2}) { }
|
|
|
16 |
20 |
elsif (lc $key2 eq 'weekend') { }
|
|
|
15 |
5 |
elsif (lc $key2 eq 'weekday') { }
|
|
|
3 |
3 |
elsif (lc $key2 eq 'holidays' and ref $hash->{$key1}{$key2} eq 'ARRAY') { }
|
|
356
|
197 |
265 |
if $Settings{'exclude'}{'days'}[$inx]
|
|
357
|
1 |
65 |
if $count == 7
|
|
359
|
19 |
761 |
if $Settings{'exclude'}{'months'}[$inx]
|
|
360
|
1 |
64 |
if $count == 12
|
|
387
|
1 |
88 |
unless $Settings{'startdate'}
|
|
388
|
1 |
87 |
if $Settings{'enddate'} and compare_dates($Settings{'enddate'}, $Settings{'startdate'}) < 0
|
|
389
|
2 |
85 |
unless $Settings{'maxcount'}
|