| line |
true |
false |
branch |
|
103
|
32 |
12 |
if (exists $params{'holidays'}) { } |
|
104
|
30 |
2 |
if (ref $params{'holidays'} and ref $params{'holidays'} eq 'ARRAY') { } |
|
137
|
1 |
1 |
if (exists $params{'include_bank_holiday'} and $params{'include_bank_holiday'}) |
|
162
|
1 |
34 |
if (exists $params{'no_melbourne_cup'} and $params{'no_melbourne_cup'}) { } |
|
178
|
3 |
1 |
if (exists $params{'include_bank_holiday'} and $params{'include_bank_holiday'}) |
|
199
|
1 |
10 |
if (exists $params{'no_show_day'} and $params{'no_show_day'}) { } |
|
263
|
176 |
2 |
if (exists $params{'year'} and defined $params{'year'}) { } |
|
269
|
2 |
176 |
unless ($params{'year'} =~ /^\d{1,4}$/msx) |
|
274
|
4 |
172 |
unless (defined $params{'state'}) |
|
281
|
1 |
175 |
unless ($allowed_states{$state}) |
|
289
|
171 |
73 |
if ($holiday eq '0101') { } |
|
303
|
171 |
18 |
if ($holiday eq '0126') { } |
|
347
|
38 |
133 |
if (defined $states_with_anzac_day_holiday_in_lieu{$state} and $states_with_anzac_day_holiday_in_lieu{$state} <= $year) { } |
|
357
|
38 |
17 |
if ($holiday eq '0425') { } |
|
378
|
35 |
136 |
if ($state eq 'WA') { } |
|
|
11 |
125 |
elsif ($state eq 'QLD') { } |
|
381
|
26 |
7 |
if ($year <= _YEAR_OF_QUEEN_ELIZABETHS_DEATH()) { } |
|
392
|
8 |
3 |
if ($year <= _YEAR_OF_QUEEN_ELIZABETHS_DEATH()) { } |
|
403
|
109 |
16 |
if ($year <= _YEAR_OF_QUEEN_ELIZABETHS_DEATH()) { } |
|
416
|
1 |
169 |
unless (defined $state) |
|
421
|
5 |
44 |
unless $params->{$key} |
|
422
|
32 |
12 |
if (ref $params->{$key}) { } |
|
423
|
30 |
2 |
if (ref $params->{$key} eq "ARRAY") |
|
438
|
123 |
41 |
if ($holidays->{$date}) { } |
|
463
|
7 |
162 |
if ($state eq "SA") |
|
479
|
21 |
148 |
if ($wday == _FRIDAY()) { } |
|
|
49 |
99 |
elsif ($wday == _SATURDAY()) { } |
|
|
56 |
43 |
elsif ($wday == _SUNDAY()) { } |
|
486
|
3 |
18 |
if ($state eq "NSW" and $year >= _STARTING_YEAR_FOR_NSW_ADDITIONAL_DAY()) |
|
510
|
1 |
48 |
if ($state eq "NSW" and $year >= _STARTING_YEAR_FOR_NSW_ADDITIONAL_DAY()) |
|
528
|
1 |
55 |
if ($state eq "NSW" and $year >= _STARTING_YEAR_FOR_NSW_ADDITIONAL_DAY()) |
|
556
|
5 |
11 |
if (exists $params->{'region'} and defined $params->{'region'}) { } |
|
559
|
4 |
1 |
if ($nt_show_day{$region}) { } |
|
580
|
54 |
240 |
if ($wday == _FRIDAY()) |
|
583
|
279 |
15 |
if ($fridays < $num_fridays) |
|
610
|
5 |
5 |
if ($wday >= _MONDAY() and $wday <= _WEDNESDAY()) { } |
|
619
|
25 |
116 |
if ($wday == _WEDNESDAY()) |
|
622
|
131 |
10 |
if ($wednesdays < $num_wednesdays) |
|
639
|
1 |
3 |
if ($wday == _THURSDAY()) { } |
|
675
|
1 |
3 |
if ($year % _NUMBER_OF_YEARS_FOR_A_LEAP_YEAR()) { } |
|
678
|
1 |
2 |
if ($year % _YEARS_IN_ONE_CENTURY()) { } |
|
682
|
1 |
1 |
if ($year % _YEARS_IN_FOUR_CENTURIES()) { } |
|
695
|
4 |
11 |
if ($wday == _WEDNESDAY()) |
|
698
|
11 |
4 |
if ($wednesdays < 1) |
|
717
|
84 |
313 |
if ($wday == _MONDAY()) |
|
720
|
355 |
42 |
if ($mondays < 2) |
|
738
|
1 |
1 |
if ($wday == _TUESDAY()) |
|
741
|
1 |
1 |
if ($tuesdays < 1) |
|
760
|
2 |
7 |
if ($wday == _MONDAY()) |
|
763
|
8 |
1 |
if ($mondays < 2) |
|
782
|
24 |
127 |
if ($wday == _MONDAY()) |
|
785
|
143 |
8 |
if ($mondays < 3) |
|
803
|
3 |
5 |
if ($wday == _MONDAY()) |
|
806
|
5 |
3 |
if ($mondays < 1) |
|
825
|
34 |
57 |
if ($wday == _TUESDAY()) |
|
828
|
57 |
34 |
if ($tuesdays < 1) |
|
846
|
35 |
125 |
if ($wday == _MONDAY()) |
|
849
|
125 |
35 |
if ($mondays < 1) |
|
867
|
11 |
28 |
if ($wday == _MONDAY()) |
|
870
|
28 |
11 |
if ($mondays < 1) |
|
888
|
250 |
1296 |
if ($wday == _MONDAY()) |
|
891
|
1421 |
125 |
if ($mondays < 2) |
|
901
|
3 |
4 |
if ($year == 2006) |
|
912
|
12 |
54 |
if ($wday == _MONDAY()) |
|
915
|
62 |
4 |
if ($mondays < 3) |
|
925
|
4 |
3 |
if ($year != 2006) |
|
936
|
6 |
33 |
if ($wday == _MONDAY()) |
|
939
|
36 |
3 |
if ($mondays < 2) |
|
957
|
72 |
340 |
if ($wday == _MONDAY()) |
|
960
|
376 |
36 |
if ($mondays < 2) |
|
979
|
11 |
31 |
if ($wday == _MONDAY()) |
|
982
|
31 |
11 |
if ($mondays < $which_week) |
|
1007
|
19 |
17 |
if ($year < 2015) { } |
|
|
16 |
1 |
elsif ($grand_final_eve_day{$year}) { } |
|
1032
|
35 |
97 |
if ($wday == _MONDAY()) |
|
1035
|
97 |
35 |
if ($mondays < 1) |
|
1053
|
16 |
22 |
if ($wday == _MONDAY()) |
|
1056
|
22 |
16 |
if ($mondays < 1) |
|
1074
|
2 |
10 |
if ($wday == _THURSDAY()) |
|
1077
|
10 |
2 |
if ($thursdays < 1) |
|
1096
|
8 |
7 |
if ($wday == _SATURDAY()) |
|
1099
|
7 |
8 |
if ($saturdays < 1) |
|
1105
|
1 |
7 |
if ($day == 1) { } |
|
1125
|
2 |
7 |
if ($wday == _SATURDAY()) |
|
1128
|
8 |
1 |
if ($saturdays < 2) |
|
1147
|
3 |
13 |
if ($wday == _SATURDAY()) |
|
1150
|
15 |
1 |
if ($saturdays < 3) |
|
1169
|
12 |
57 |
if ($wday == _SATURDAY()) |
|
1172
|
66 |
3 |
if ($saturdays < 4) |
|
1191
|
15 |
6 |
if ($wday == _MONDAY()) |
|
1194
|
6 |
15 |
if ($mondays < 1) |
|
1212
|
4 |
6 |
if ($wday == _MONDAY()) |
|
1215
|
6 |
4 |
if ($mondays < 1) |
|
1233
|
33 |
80 |
if ($wday == _MONDAY()) |
|
1236
|
80 |
33 |
if ($mondays < 1) |
|
1274
|
33 |
2 |
if ($wa_royal_bday{$year}) { } |
|
|
1 |
1 |
elsif ($year <= _YEAR_OF_QUEEN_ELIZABETHS_DEATH()) { } |
|
1300
|
61 |
110 |
if ($month == 2) { } |
|
1305
|
1 |
109 |
if ($day == 2) { } |
|
|
2 |
107 |
elsif ($day == 1) { } |
|
1326
|
61 |
110 |
if ($month == 2) { } |
|
1327
|
4 |
57 |
if ($day == $days_in_month[$month]) { } |
|
1337
|
42 |
129 |
if ($state eq "TAS") |
|
1338
|
5 |
37 |
if ($month == 2) { } |
|
1339
|
1 |
4 |
if ($day == $days_in_month[$month]) { } |
|
|
1 |
3 |
elsif ($day + 1 == $days_in_month[$month]) { } |
|
1363
|
380 |
133 |
if ($params->{'day_in_lieu'}) |
|
1366
|
39 |
341 |
if ($wday == _SUNDAY()) { } |
|
|
69 |
272 |
elsif ($wday == _SATURDAY()) { } |