| line | stmt | bran | cond | sub | pod | time | code | 
| 1 |  |  |  |  |  |  |  | 
| 2 |  |  |  |  |  |  | ############################################################################### | 
| 3 |  |  |  |  |  |  | ##                                                                           ## | 
| 4 |  |  |  |  |  |  | ##    Copyright (c) 2000 - 2015 by Steffen Beyer.                            ## | 
| 5 |  |  |  |  |  |  | ##    All rights reserved.                                                   ## | 
| 6 |  |  |  |  |  |  | ##                                                                           ## | 
| 7 |  |  |  |  |  |  | ##    This package is free software; you can redistribute it                 ## | 
| 8 |  |  |  |  |  |  | ##    and/or modify it under the same terms as Perl itself.                  ## | 
| 9 |  |  |  |  |  |  | ##                                                                           ## | 
| 10 |  |  |  |  |  |  | ############################################################################### | 
| 11 |  |  |  |  |  |  |  | 
| 12 |  |  |  |  |  |  | package Date::Calendar::Profiles; | 
| 13 |  |  |  |  |  |  |  | 
| 14 | 4 |  |  | 4 |  | 5928 | BEGIN { eval { require bytes; }; } | 
|  | 4 |  |  |  |  | 134 |  | 
| 15 | 4 |  |  | 4 |  | 15 | use strict; | 
|  | 4 |  |  |  |  | 5 |  | 
|  | 4 |  |  |  |  | 135 |  | 
| 16 | 4 |  |  | 4 |  | 14 | use vars qw( @ISA @EXPORT @EXPORT_OK $VERSION $Profiles ); | 
|  | 4 |  |  |  |  | 5 |  | 
|  | 4 |  |  |  |  | 412 |  | 
| 17 |  |  |  |  |  |  |  | 
| 18 |  |  |  |  |  |  | require Exporter; | 
| 19 |  |  |  |  |  |  |  | 
| 20 |  |  |  |  |  |  | @ISA = qw(Exporter); | 
| 21 |  |  |  |  |  |  |  | 
| 22 |  |  |  |  |  |  | @EXPORT = qw(); | 
| 23 |  |  |  |  |  |  |  | 
| 24 |  |  |  |  |  |  | @EXPORT_OK = qw( | 
| 25 |  |  |  |  |  |  | $Profiles | 
| 26 |  |  |  |  |  |  | &Previous_Friday | 
| 27 |  |  |  |  |  |  | &Next_Monday | 
| 28 |  |  |  |  |  |  | &Next_Monday_or_Tuesday | 
| 29 |  |  |  |  |  |  | &Nearest_Workday | 
| 30 |  |  |  |  |  |  | &Sunday_to_Monday | 
| 31 |  |  |  |  |  |  | &Advent1 | 
| 32 |  |  |  |  |  |  | &Advent2 | 
| 33 |  |  |  |  |  |  | &Advent3 | 
| 34 |  |  |  |  |  |  | &Advent4 | 
| 35 |  |  |  |  |  |  | &Advent | 
| 36 |  |  |  |  |  |  | ); | 
| 37 |  |  |  |  |  |  |  | 
| 38 |  |  |  |  |  |  | $VERSION = '6.4'; | 
| 39 |  |  |  |  |  |  |  | 
| 40 | 4 |  |  | 4 |  | 504 | use Date::Calc qw(:all); | 
|  | 4 |  |  |  |  | 5 |  | 
|  | 4 |  |  |  |  | 1775 |  | 
| 41 | 4 |  |  | 4 |  | 68 | use Carp::Clan qw(^Date::); | 
|  | 4 |  |  |  |  | 5 |  | 
|  | 4 |  |  |  |  | 47 |  | 
| 42 |  |  |  |  |  |  |  | 
| 43 |  |  |  |  |  |  | ########################################################################## | 
| 44 |  |  |  |  |  |  | #                                                                        # | 
| 45 |  |  |  |  |  |  | #  Moving ("variable") holidays depending on the date of Easter Sunday:  # | 
| 46 |  |  |  |  |  |  | #                                                                        # | 
| 47 |  |  |  |  |  |  | #  Weiberfastnacht, Fettdonnerstag                         =  -52 days   # | 
| 48 |  |  |  |  |  |  | #  Carnival Monday / Rosenmontag / Veille du Mardi Gras    =  -48 days   # | 
| 49 |  |  |  |  |  |  | #  Mardi Gras / Karnevalsdienstag / Mardi Gras             =  -47 days   # | 
| 50 |  |  |  |  |  |  | #  Ash Wednesday / Aschermittwoch / Mercredi des Cendres   =  -46 days   # | 
| 51 |  |  |  |  |  |  | #  Palm Sunday / Palmsonntag / Dimanche des Rameaux        =   -7 days   # | 
| 52 |  |  |  |  |  |  | #  Maundy Thursday / Gruendonnerstag / Jeudi avant Paques  =   -3 days   # | 
| 53 |  |  |  |  |  |  | #  Good Friday / Karfreitag / Vendredi Saint               =   -2 days   # | 
| 54 |  |  |  |  |  |  | #  Easter Saturday / Ostersamstag / Samedi de Paques       =   -1 day    # | 
| 55 |  |  |  |  |  |  | #  Easter Sunday / Ostersonntag / Dimanche de Paques       =   +0 days   # | 
| 56 |  |  |  |  |  |  | #  Easter Monday / Ostermontag / Lundi de Paques           =   +1 day    # | 
| 57 |  |  |  |  |  |  | #  Prayer Day / Bettag / Jour de la Priere (Denmark)       =  +26 days   # | 
| 58 |  |  |  |  |  |  | #  Ascension of Christ / Christi Himmelfahrt / Ascension   =  +39 days   # | 
| 59 |  |  |  |  |  |  | #  Whitsunday / Pfingstsonntag / Dimanche de Pentecote     =  +49 days   # | 
| 60 |  |  |  |  |  |  | #  Whitmonday / Pfingstmontag / Lundi de Pentecote         =  +50 days   # | 
| 61 |  |  |  |  |  |  | #  Feast of Corpus Christi / Fronleichnam / Fete-Dieu      =  +60 days   # | 
| 62 |  |  |  |  |  |  | #                                                                        # | 
| 63 |  |  |  |  |  |  | ########################################################################## | 
| 64 |  |  |  |  |  |  |  | 
| 65 |  |  |  |  |  |  | ############################################### | 
| 66 |  |  |  |  |  |  | #                                             # | 
| 67 |  |  |  |  |  |  | # Rules to enhance readability:               # | 
| 68 |  |  |  |  |  |  | #                                             # | 
| 69 |  |  |  |  |  |  | # 1) First level constants in single quotes,  # | 
| 70 |  |  |  |  |  |  | #    second level constants in double quotes. # | 
| 71 |  |  |  |  |  |  | # 2) Use leading zeros for fixed length.      # | 
| 72 |  |  |  |  |  |  | #                                             # | 
| 73 |  |  |  |  |  |  | ############################################### | 
| 74 |  |  |  |  |  |  |  | 
| 75 |  |  |  |  |  |  | ##################### | 
| 76 |  |  |  |  |  |  | # Global variables: # | 
| 77 |  |  |  |  |  |  | ##################### | 
| 78 |  |  |  |  |  |  |  | 
| 79 |  |  |  |  |  |  | $Profiles = { }; | 
| 80 |  |  |  |  |  |  |  | 
| 81 |  |  |  |  |  |  | ############################### | 
| 82 |  |  |  |  |  |  | # Global utility subroutines: # | 
| 83 |  |  |  |  |  |  | ############################### | 
| 84 |  |  |  |  |  |  |  | 
| 85 |  |  |  |  |  |  | sub Previous_Friday | 
| 86 |  |  |  |  |  |  | { | 
| 87 | 4 |  |  | 4 | 0 | 6 | my($yy) = shift; | 
| 88 | 4 |  |  |  |  | 5 | my($mm) = shift; | 
| 89 | 4 |  |  |  |  | 5 | my($dd) = shift; | 
| 90 | 4 |  |  |  |  | 4 | my($dow); | 
| 91 |  |  |  |  |  |  |  | 
| 92 |  |  |  |  |  |  | # If holiday falls on Saturday or Sunday, use previous Friday instead: | 
| 93 |  |  |  |  |  |  |  | 
| 94 | 4 |  |  |  |  | 9 | $dow = Day_of_Week($yy,$mm,$dd); | 
| 95 | 4 | 50 |  |  |  | 13 | if    ($dow == 6) { ($yy,$mm,$dd) = Add_Delta_Days($yy,$mm,$dd,-1); } | 
|  | 0 | 50 |  |  |  | 0 |  | 
| 96 | 0 |  |  |  |  | 0 | elsif ($dow == 7) { ($yy,$mm,$dd) = Add_Delta_Days($yy,$mm,$dd,-2); } | 
| 97 | 4 |  |  |  |  | 16 | return($yy,$mm,$dd,@_); | 
| 98 |  |  |  |  |  |  | } | 
| 99 |  |  |  |  |  |  |  | 
| 100 |  |  |  |  |  |  | sub Next_Monday | 
| 101 |  |  |  |  |  |  | { | 
| 102 | 154 |  |  | 154 | 0 | 156 | my($yy) = shift; | 
| 103 | 154 |  |  |  |  | 167 | my($mm) = shift; | 
| 104 | 154 |  |  |  |  | 140 | my($dd) = shift; | 
| 105 | 154 |  |  |  |  | 128 | my($dow); | 
| 106 |  |  |  |  |  |  |  | 
| 107 |  |  |  |  |  |  | # If holiday falls on Saturday, use following Monday instead; | 
| 108 |  |  |  |  |  |  | # if holiday falls on Sunday, use day thereafter (Monday) instead: | 
| 109 |  |  |  |  |  |  |  | 
| 110 | 154 |  |  |  |  | 289 | $dow = Day_of_Week($yy,$mm,$dd); | 
| 111 | 154 | 100 |  |  |  | 363 | if    ($dow == 6) { ($yy,$mm,$dd) = Add_Delta_Days($yy,$mm,$dd,+2); } | 
|  | 67 | 100 |  |  |  | 162 |  | 
| 112 | 7 |  |  |  |  | 19 | elsif ($dow == 7) { ($yy,$mm,$dd) = Add_Delta_Days($yy,$mm,$dd,+1); } | 
| 113 | 154 |  |  |  |  | 586 | return($yy,$mm,$dd,@_); | 
| 114 |  |  |  |  |  |  | } | 
| 115 |  |  |  |  |  |  |  | 
| 116 |  |  |  |  |  |  | sub Next_Monday_or_Tuesday # For second holiday of two adjacent ones! | 
| 117 |  |  |  |  |  |  | { | 
| 118 | 11 |  |  | 11 | 0 | 17 | my($yy) = shift; | 
| 119 | 11 |  |  |  |  | 21 | my($mm) = shift; | 
| 120 | 11 |  |  |  |  | 7 | my($dd) = shift; | 
| 121 | 11 |  |  |  |  | 12 | my($dow); | 
| 122 |  |  |  |  |  |  |  | 
| 123 |  |  |  |  |  |  | # If holiday falls on Saturday, use following Monday instead; | 
| 124 |  |  |  |  |  |  | # if holiday falls on Sunday or Monday, use next Tuesday instead | 
| 125 |  |  |  |  |  |  | # (because Monday is already taken by adjacent holiday on the day before): | 
| 126 |  |  |  |  |  |  |  | 
| 127 | 11 |  |  |  |  | 23 | $dow = Day_of_Week($yy,$mm,$dd); | 
| 128 | 11 | 100 | 66 |  |  | 62 | if    ($dow == 6 or $dow == 7) { ($yy,$mm,$dd) = Add_Delta_Days($yy,$mm,$dd,+2); } | 
|  | 1 | 50 |  |  |  | 4 |  | 
| 129 | 0 |  |  |  |  | 0 | elsif ($dow == 1)              { ($yy,$mm,$dd) = Add_Delta_Days($yy,$mm,$dd,+1); } | 
| 130 | 11 |  |  |  |  | 49 | return($yy,$mm,$dd,@_); | 
| 131 |  |  |  |  |  |  | } | 
| 132 |  |  |  |  |  |  |  | 
| 133 |  |  |  |  |  |  | sub Nearest_Workday | 
| 134 |  |  |  |  |  |  | { | 
| 135 | 122 |  |  | 122 | 0 | 144 | my($yy) = shift; | 
| 136 | 122 |  |  |  |  | 121 | my($mm) = shift; | 
| 137 | 122 |  |  |  |  | 110 | my($dd) = shift; | 
| 138 | 122 |  |  |  |  | 111 | my($dow); | 
| 139 |  |  |  |  |  |  |  | 
| 140 |  |  |  |  |  |  | # If holiday falls on Saturday, use day before (Friday) instead; | 
| 141 |  |  |  |  |  |  | # if holiday falls on Sunday, use day thereafter (Monday) instead: | 
| 142 |  |  |  |  |  |  |  | 
| 143 | 122 |  |  |  |  | 222 | $dow = Day_of_Week($yy,$mm,$dd); | 
| 144 | 122 | 100 |  |  |  | 284 | if    ($dow == 6) { ($yy,$mm,$dd) = Add_Delta_Days($yy,$mm,$dd,-1); } | 
|  | 61 | 50 |  |  |  | 159 |  | 
| 145 | 0 |  |  |  |  | 0 | elsif ($dow == 7) { ($yy,$mm,$dd) = Add_Delta_Days($yy,$mm,$dd,+1); } | 
| 146 | 122 |  |  |  |  | 499 | return($yy,$mm,$dd,@_); | 
| 147 |  |  |  |  |  |  | } | 
| 148 |  |  |  |  |  |  |  | 
| 149 |  |  |  |  |  |  | sub Sunday_to_Monday | 
| 150 |  |  |  |  |  |  | { | 
| 151 | 103 |  |  | 103 | 0 | 106 | my($yy) = shift; | 
| 152 | 103 |  |  |  |  | 84 | my($mm) = shift; | 
| 153 | 103 |  |  |  |  | 87 | my($dd) = shift; | 
| 154 | 103 |  |  |  |  | 80 | my($dow); | 
| 155 |  |  |  |  |  |  |  | 
| 156 |  |  |  |  |  |  | # If holiday falls on Sunday, use day thereafter (Monday) instead: | 
| 157 |  |  |  |  |  |  |  | 
| 158 | 103 |  |  |  |  | 185 | $dow = Day_of_Week($yy,$mm,$dd); | 
| 159 | 103 | 100 |  |  |  | 172 | if ($dow == 7) { ($yy,$mm,$dd) = Add_Delta_Days($yy,$mm,$dd,+1); } | 
|  | 10 |  |  |  |  | 27 |  | 
| 160 | 103 |  |  |  |  | 351 | return($yy,$mm,$dd,@_); | 
| 161 |  |  |  |  |  |  | } | 
| 162 |  |  |  |  |  |  |  | 
| 163 |  |  |  |  |  |  | ###################################### | 
| 164 |  |  |  |  |  |  | # Global utility callback functions: # | 
| 165 |  |  |  |  |  |  | ###################################### | 
| 166 |  |  |  |  |  |  |  | 
| 167 |  |  |  |  |  |  | sub Advent1 | 
| 168 |  |  |  |  |  |  | { | 
| 169 | 2 |  |  | 2 | 0 | 3 | my($year,$label) = @_; | 
| 170 | 2 |  |  |  |  | 8 | return( Add_Delta_Days($year,12,25, | 
| 171 |  |  |  |  |  |  | -(Day_of_Week($year,12,25)+21)), '#' ); | 
| 172 |  |  |  |  |  |  | } | 
| 173 |  |  |  |  |  |  | sub Advent2 | 
| 174 |  |  |  |  |  |  | { | 
| 175 | 0 |  |  | 0 | 0 | 0 | my($year,$label) = @_; | 
| 176 | 0 |  |  |  |  | 0 | return( Add_Delta_Days($year,12,25, | 
| 177 |  |  |  |  |  |  | -(Day_of_Week($year,12,25)+14)), '#' ); | 
| 178 |  |  |  |  |  |  | } | 
| 179 |  |  |  |  |  |  | sub Advent3 | 
| 180 |  |  |  |  |  |  | { | 
| 181 | 0 |  |  | 0 | 0 | 0 | my($year,$label) = @_; | 
| 182 | 0 |  |  |  |  | 0 | return( Add_Delta_Days($year,12,25, | 
| 183 |  |  |  |  |  |  | -(Day_of_Week($year,12,25)+7)), '#' ); | 
| 184 |  |  |  |  |  |  | } | 
| 185 |  |  |  |  |  |  | sub Advent4 | 
| 186 |  |  |  |  |  |  | { | 
| 187 | 0 |  |  | 0 | 0 | 0 | my($year,$label) = @_; | 
| 188 | 0 |  |  |  |  | 0 | return( Add_Delta_Days($year,12,25, | 
| 189 |  |  |  |  |  |  | -Day_of_Week($year,12,25)), '#' ); | 
| 190 |  |  |  |  |  |  | } | 
| 191 |  |  |  |  |  |  |  | 
| 192 |  |  |  |  |  |  | sub Advent | 
| 193 |  |  |  |  |  |  | { | 
| 194 | 148 |  |  | 148 | 0 | 213 | my($year,$label) = @_; | 
| 195 | 148 |  |  |  |  | 150 | my($offset); | 
| 196 |  |  |  |  |  |  |  | 
| 197 | 148 |  |  |  |  | 338 | $offset = (4 - substr($label,0,1)) * 7; | 
| 198 | 148 |  |  |  |  | 359 | return( Add_Delta_Days($year,12,25, | 
| 199 |  |  |  |  |  |  | -(Day_of_Week($year,12,25)+$offset)), '#' ); | 
| 200 |  |  |  |  |  |  | } | 
| 201 |  |  |  |  |  |  |  | 
| 202 |  |  |  |  |  |  | ################### | 
| 203 |  |  |  |  |  |  | # Local profiles: # | 
| 204 |  |  |  |  |  |  | ################### | 
| 205 |  |  |  |  |  |  |  | 
| 206 |  |  |  |  |  |  | $Profiles->{'DE'} = # Deutschland | 
| 207 |  |  |  |  |  |  | { | 
| 208 |  |  |  |  |  |  | # For labeling only (defaults, may be overridden): | 
| 209 |  |  |  |  |  |  | "Dreikönigstag"             => "#06.01.", | 
| 210 |  |  |  |  |  |  | "Valentinstag"              => "#14.02.", | 
| 211 |  |  |  |  |  |  | "Weltfrauentag"             => "#08.03.", | 
| 212 |  |  |  |  |  |  | "Josephstag"                => "#19.03.", | 
| 213 |  |  |  |  |  |  | "Frühlingsanfang"           => "#20.03.", | 
| 214 |  |  |  |  |  |  | "Sommeranfang"              => "#21.06.", | 
| 215 |  |  |  |  |  |  | "Herbstanfang"              => "#23.09.", | 
| 216 |  |  |  |  |  |  | "Winteranfang"              => "#21.12.", | 
| 217 |  |  |  |  |  |  | "Beginn d. Sommerzeit"      => "#5/Sun/Mar", | 
| 218 |  |  |  |  |  |  | "Fettdonnerstag"            => "#-52", | 
| 219 |  |  |  |  |  |  | "Weiberfastnacht"           => "#-52", | 
| 220 |  |  |  |  |  |  | "Rosenmontag"               => "#-48", | 
| 221 |  |  |  |  |  |  | "Karnevalsdienstag"         => "#-47", | 
| 222 |  |  |  |  |  |  | "Aschermittwoch"            => "#-46", | 
| 223 |  |  |  |  |  |  | "Palmsonntag"               => "#-7", | 
| 224 |  |  |  |  |  |  | "Gründonnerstag"            => "#-3", | 
| 225 |  |  |  |  |  |  | "Karfreitag"                => "#-2", | 
| 226 |  |  |  |  |  |  | "Karsamstag"                => "#-1", | 
| 227 |  |  |  |  |  |  | "Muttertag"                 => "#2/Sun/May", | 
| 228 |  |  |  |  |  |  | "Vatertag"                  => "#2/Sun/Aug", | 
| 229 |  |  |  |  |  |  | "Peter und Paul"            => "#29.06.", | 
| 230 |  |  |  |  |  |  | "Fronleichnam"              => "#+60", | 
| 231 |  |  |  |  |  |  | "Mariä Himmelfahrt"         => "#15.08.", | 
| 232 |  |  |  |  |  |  | "Erntedankfest"             => "#1/Sun/Oct", | 
| 233 |  |  |  |  |  |  | "Ende d. Sommerzeit"        => "#5/Sun/Oct", | 
| 234 |  |  |  |  |  |  | "Reformationstag"           => "#31.10.", | 
| 235 |  |  |  |  |  |  | "Allerheiligen"             => "#01.11.", | 
| 236 |  |  |  |  |  |  | "Allerseelen"               => "#02.11.", | 
| 237 |  |  |  |  |  |  | "Martinstag"                => "#11.11.", | 
| 238 |  |  |  |  |  |  | "Mariä Empfängnis"          => "#08.12.", | 
| 239 |  |  |  |  |  |  | "Buß- und Bettag"           => \&DE_Buss_und_Bettag2, | 
| 240 |  |  |  |  |  |  | "Volkstrauertag"            => \&DE_Volkstrauertag, | 
| 241 |  |  |  |  |  |  | "Totensonntag"              => \&DE_Totensonntag, | 
| 242 |  |  |  |  |  |  | "1. Advent"                 => \&Advent, | 
| 243 |  |  |  |  |  |  | "2. Advent"                 => \&Advent, | 
| 244 |  |  |  |  |  |  | "3. Advent"                 => \&Advent, | 
| 245 |  |  |  |  |  |  | "4. Advent"                 => \&Advent, | 
| 246 |  |  |  |  |  |  | "Nikolaus"                  => "#06.12.", | 
| 247 |  |  |  |  |  |  | "Heiligabend"               => "#24.12.", | 
| 248 |  |  |  |  |  |  | "Sylvester"                 => "#31.12.", | 
| 249 |  |  |  |  |  |  | # Common legal holidays (in all federal states): | 
| 250 |  |  |  |  |  |  | "Neujahr"                   => "01.01.", | 
| 251 |  |  |  |  |  |  | "Karfreitag"                => "-2", | 
| 252 |  |  |  |  |  |  | "Ostersonntag"              => "+0", | 
| 253 |  |  |  |  |  |  | "Ostermontag"               => "+1", | 
| 254 |  |  |  |  |  |  | "Tag der Arbeit"            => "01.05.", | 
| 255 |  |  |  |  |  |  | "Christi Himmelfahrt"       => "+39", | 
| 256 |  |  |  |  |  |  | "Pfingstsonntag"            => "+49", | 
| 257 |  |  |  |  |  |  | "Pfingstmontag"             => "+50", | 
| 258 |  |  |  |  |  |  | "Tag der deutschen Einheit" => "03.10.", | 
| 259 |  |  |  |  |  |  | "1. Weihnachtsfeiertag"     => "25.12.", | 
| 260 |  |  |  |  |  |  | "2. Weihnachtsfeiertag"     => "26.12." | 
| 261 |  |  |  |  |  |  | }; | 
| 262 |  |  |  |  |  |  |  | 
| 263 |  |  |  |  |  |  | $Profiles->{'DE-BW'} = # Baden-Württemberg | 
| 264 |  |  |  |  |  |  | { | 
| 265 |  |  |  |  |  |  | %{$Profiles->{'DE'}}, | 
| 266 |  |  |  |  |  |  | "Dreikönigstag"             => "06.01.", | 
| 267 |  |  |  |  |  |  | "Fronleichnam"              => "+60", | 
| 268 |  |  |  |  |  |  | "Allerheiligen"             => "01.11." | 
| 269 |  |  |  |  |  |  | }; | 
| 270 |  |  |  |  |  |  | $Profiles->{'DE-BY'} = # Bayern | 
| 271 |  |  |  |  |  |  | { | 
| 272 |  |  |  |  |  |  | %{$Profiles->{'DE'}}, | 
| 273 |  |  |  |  |  |  | "Dreikönigstag"             => "06.01.", | 
| 274 |  |  |  |  |  |  | "Fronleichnam"              => "+60", | 
| 275 |  |  |  |  |  |  | "Mariä Himmelfahrt"         => "15.08.", | 
| 276 |  |  |  |  |  |  | "Allerheiligen"             => "01.11." | 
| 277 |  |  |  |  |  |  | }; | 
| 278 |  |  |  |  |  |  | $Profiles->{'DE-BE'} = # Berlin | 
| 279 |  |  |  |  |  |  | { | 
| 280 |  |  |  |  |  |  | %{$Profiles->{'DE'}} | 
| 281 |  |  |  |  |  |  | }; | 
| 282 |  |  |  |  |  |  | $Profiles->{'DE-BB'} = # Brandenburg | 
| 283 |  |  |  |  |  |  | { | 
| 284 |  |  |  |  |  |  | %{$Profiles->{'DE'}}, | 
| 285 |  |  |  |  |  |  | "Reformationstag"           => "31.10." | 
| 286 |  |  |  |  |  |  | }; | 
| 287 |  |  |  |  |  |  | $Profiles->{'DE-HB'} = # Bremen | 
| 288 |  |  |  |  |  |  | { | 
| 289 |  |  |  |  |  |  | %{$Profiles->{'DE'}} | 
| 290 |  |  |  |  |  |  | }; | 
| 291 |  |  |  |  |  |  | $Profiles->{'DE-HH'} = # Hamburg | 
| 292 |  |  |  |  |  |  | { | 
| 293 |  |  |  |  |  |  | %{$Profiles->{'DE'}} | 
| 294 |  |  |  |  |  |  | }; | 
| 295 |  |  |  |  |  |  | $Profiles->{'DE-HE'} = # Hessen | 
| 296 |  |  |  |  |  |  | { | 
| 297 |  |  |  |  |  |  | %{$Profiles->{'DE'}}, | 
| 298 |  |  |  |  |  |  | "Fronleichnam"              => "+60" | 
| 299 |  |  |  |  |  |  | }; | 
| 300 |  |  |  |  |  |  | $Profiles->{'DE-MV'} = # Mecklenburg-Vorpommern | 
| 301 |  |  |  |  |  |  | { | 
| 302 |  |  |  |  |  |  | %{$Profiles->{'DE'}}, | 
| 303 |  |  |  |  |  |  | "Reformationstag"           => "31.10." | 
| 304 |  |  |  |  |  |  | }; | 
| 305 |  |  |  |  |  |  | $Profiles->{'DE-NI'} = # Niedersachsen | 
| 306 |  |  |  |  |  |  | { | 
| 307 |  |  |  |  |  |  | %{$Profiles->{'DE'}} | 
| 308 |  |  |  |  |  |  | }; | 
| 309 |  |  |  |  |  |  | $Profiles->{'DE-NW'} = # Nordrhein-Westfalen | 
| 310 |  |  |  |  |  |  | { | 
| 311 |  |  |  |  |  |  | %{$Profiles->{'DE'}}, | 
| 312 |  |  |  |  |  |  | "Fronleichnam"              => "+60", | 
| 313 |  |  |  |  |  |  | "Allerheiligen"             => "01.11." | 
| 314 |  |  |  |  |  |  | }; | 
| 315 |  |  |  |  |  |  | $Profiles->{'DE-RP'} = # Rheinland-Pfalz | 
| 316 |  |  |  |  |  |  | { | 
| 317 |  |  |  |  |  |  | %{$Profiles->{'DE'}}, | 
| 318 |  |  |  |  |  |  | "Fronleichnam"              => "+60", | 
| 319 |  |  |  |  |  |  | "Allerheiligen"             => "01.11." | 
| 320 |  |  |  |  |  |  | }; | 
| 321 |  |  |  |  |  |  | $Profiles->{'DE-SL'} = # Saarland | 
| 322 |  |  |  |  |  |  | { | 
| 323 |  |  |  |  |  |  | %{$Profiles->{'DE'}}, | 
| 324 |  |  |  |  |  |  | "Fronleichnam"              => "+60", | 
| 325 |  |  |  |  |  |  | "Mariä Himmelfahrt"         => "15.08.", | 
| 326 |  |  |  |  |  |  | "Allerheiligen"             => "01.11." | 
| 327 |  |  |  |  |  |  | }; | 
| 328 |  |  |  |  |  |  | $Profiles->{'DE-SN'} = # Sachsen | 
| 329 |  |  |  |  |  |  | { | 
| 330 |  |  |  |  |  |  | %{$Profiles->{'DE'}}, | 
| 331 |  |  |  |  |  |  | "Reformationstag"           => "31.10.", | 
| 332 |  |  |  |  |  |  | "Buß- und Bettag"           => \&DE_Buss_und_Bettag | 
| 333 |  |  |  |  |  |  | }; | 
| 334 |  |  |  |  |  |  | $Profiles->{'DE-ST'} = # Sachsen-Anhalt | 
| 335 |  |  |  |  |  |  | { | 
| 336 |  |  |  |  |  |  | %{$Profiles->{'DE'}}, | 
| 337 |  |  |  |  |  |  | "Dreikönigstag"             => "06.01.", | 
| 338 |  |  |  |  |  |  | "Reformationstag"           => "31.10." | 
| 339 |  |  |  |  |  |  | }; | 
| 340 |  |  |  |  |  |  | $Profiles->{'DE-SH'} = # Schleswig-Holstein | 
| 341 |  |  |  |  |  |  | { | 
| 342 |  |  |  |  |  |  | %{$Profiles->{'DE'}} | 
| 343 |  |  |  |  |  |  | }; | 
| 344 |  |  |  |  |  |  | $Profiles->{'DE-TH'} = # Thüringen | 
| 345 |  |  |  |  |  |  | { | 
| 346 |  |  |  |  |  |  | %{$Profiles->{'DE'}}, | 
| 347 |  |  |  |  |  |  | "Reformationstag"           => "31.10." | 
| 348 |  |  |  |  |  |  | }; | 
| 349 |  |  |  |  |  |  |  | 
| 350 |  |  |  |  |  |  | # Alternative: | 
| 351 |  |  |  |  |  |  | # Buss- und Bettag = 1. Advent - 11 Tage | 
| 352 |  |  |  |  |  |  | #        1. Advent = 4. Advent - 21 Tage (3 Wochen) | 
| 353 |  |  |  |  |  |  | #        4. Advent = letzter Sonntag vor dem 25.12. | 
| 354 |  |  |  |  |  |  | # (Beide Alternativen sind auf dem Definitionsbereich | 
| 355 |  |  |  |  |  |  | # [1583..2299] aequivalent!) | 
| 356 |  |  |  |  |  |  | #sub DE_Buss_und_Bettag | 
| 357 |  |  |  |  |  |  | #{ | 
| 358 |  |  |  |  |  |  | #    my($year,$label) = @_; | 
| 359 |  |  |  |  |  |  | #    return( Add_Delta_Days($year,12,25, | 
| 360 |  |  |  |  |  |  | #        -(Day_of_Week($year,12,25)+32)) ); | 
| 361 |  |  |  |  |  |  | #} | 
| 362 |  |  |  |  |  |  |  | 
| 363 |  |  |  |  |  |  | sub DE_Buss_und_Bettag # Dritter Werktags-Mittwoch im November | 
| 364 |  |  |  |  |  |  | { | 
| 365 | 36 |  |  | 36 | 0 | 68 | my($year,$label) = @_; | 
| 366 | 36 | 100 |  |  |  | 113 | if (Day_of_Week($year,11,1) == 3) | 
| 367 | 29 |  |  |  |  | 86 | { return( Nth_Weekday_of_Month_Year($year,11,3,4) ); } | 
| 368 |  |  |  |  |  |  | else | 
| 369 | 7 |  |  |  |  | 23 | { return( Nth_Weekday_of_Month_Year($year,11,3,3) ); } | 
| 370 |  |  |  |  |  |  | } | 
| 371 |  |  |  |  |  |  | sub DE_Buss_und_Bettag2 | 
| 372 |  |  |  |  |  |  | { | 
| 373 | 35 |  |  | 35 | 0 | 123 | return( &DE_Buss_und_Bettag(@_), '#' ); | 
| 374 |  |  |  |  |  |  | } | 
| 375 |  |  |  |  |  |  | sub DE_Volkstrauertag | 
| 376 |  |  |  |  |  |  | { | 
| 377 | 36 |  |  | 36 | 0 | 65 | my($year,$label) = @_; | 
| 378 | 36 |  |  |  |  | 124 | return( Add_Delta_Days($year,12,25, | 
| 379 |  |  |  |  |  |  | -(Day_of_Week($year,12,25)+35)), '#' ); | 
| 380 |  |  |  |  |  |  | } | 
| 381 |  |  |  |  |  |  | sub DE_Totensonntag | 
| 382 |  |  |  |  |  |  | { | 
| 383 | 36 |  |  | 36 | 0 | 52 | my($year,$label) = @_; | 
| 384 | 36 |  |  |  |  | 114 | return( Add_Delta_Days($year,12,25, | 
| 385 |  |  |  |  |  |  | -(Day_of_Week($year,12,25)+28)), '#' ); | 
| 386 |  |  |  |  |  |  | } | 
| 387 |  |  |  |  |  |  |  | 
| 388 |  |  |  |  |  |  | # Thanks to: | 
| 389 |  |  |  |  |  |  | # David Cassell | 
| 390 |  |  |  |  |  |  | # Larry Rosler | 
| 391 |  |  |  |  |  |  | # Anthony Argyriou | 
| 392 |  |  |  |  |  |  | # Philip Newton | 
| 393 |  |  |  |  |  |  | # Joe Rice | 
| 394 |  |  |  |  |  |  | # Sridhar Gopal | 
| 395 |  |  |  |  |  |  |  | 
| 396 |  |  |  |  |  |  | $Profiles->{'US'} = # United States of America | 
| 397 |  |  |  |  |  |  | { | 
| 398 |  |  |  |  |  |  | # For labeling only (defaults, may be overridden): | 
| 399 |  |  |  |  |  |  | "Valentine's Day"               => "#Feb/14", | 
| 400 |  |  |  |  |  |  | "Maundy Thursday"               => "#-3", | 
| 401 |  |  |  |  |  |  | "Good Friday"                   => "#-2", | 
| 402 |  |  |  |  |  |  | "Election Day"                  => \&US_Election, | 
| 403 |  |  |  |  |  |  | # Common legal holidays (in all federal states): | 
| 404 |  |  |  |  |  |  | "New Year's Day"                => \&US_New_Year, | 
| 405 |  |  |  |  |  |  | "Martin Luther King's Birthday" => "3/Mon/Jan", | 
| 406 |  |  |  |  |  |  | "Civil Rights Day"              => "#3/Mon/Jan", # Thanks to Michael G. Schwern | 
| 407 |  |  |  |  |  |  | "Human Rights Day"              => "#3/Mon/Jan", # and http://en.wikipedia.org/wiki/Martin_Luther_King_Day | 
| 408 |  |  |  |  |  |  | "President's Day"               => "3/Mon/Feb", | 
| 409 |  |  |  |  |  |  | "Washington's Birthday"         => "#3/Mon/Feb", # Thanks to Michael G. Schwern | 
| 410 |  |  |  |  |  |  | "Memorial Day"                  => "5/Mon/May", | 
| 411 |  |  |  |  |  |  | "Independence Day"              => \&US_Independence, | 
| 412 |  |  |  |  |  |  | "Labor Day"                     => "1/Mon/Sep", | 
| 413 |  |  |  |  |  |  | "Columbus Day"                  => "2/Mon/Oct", | 
| 414 |  |  |  |  |  |  | "Halloween"                     => "#Oct/31", | 
| 415 |  |  |  |  |  |  | "All Saints Day"                => "#Nov/1", | 
| 416 |  |  |  |  |  |  | "All Souls Day"                 => "#Nov/2", | 
| 417 |  |  |  |  |  |  | "Veterans' Day"                 => \&US_Veteran, | 
| 418 |  |  |  |  |  |  | "Thanksgiving Day"              => "4/Thu/Nov", | 
| 419 |  |  |  |  |  |  | "Christmas Day"                 => \&US_Christmas, | 
| 420 |  |  |  |  |  |  | # Federal observances (thanks to http://en.wikipedia.org/wiki/US_holidays): | 
| 421 |  |  |  |  |  |  | "Inauguration Day"              => "#Jan/20", | 
| 422 |  |  |  |  |  |  | "Super Bowl Sunday"             => "#1/Sun/Feb", | 
| 423 |  |  |  |  |  |  | "Groundhog Day"                 => "#Feb/2", | 
| 424 |  |  |  |  |  |  | "St. Patrick's Day"             => "#Mar/17", | 
| 425 |  |  |  |  |  |  | "Earth Day"                     => "#Apr/22", | 
| 426 |  |  |  |  |  |  | "Cinco de Mayo"                 => "#May/5", | 
| 427 |  |  |  |  |  |  | "Mother's Day"                  => "#2/Sun/May", | 
| 428 |  |  |  |  |  |  | "Father's Day"                  => "#3/Sun/Jun", | 
| 429 |  |  |  |  |  |  | "Pearl Harbor Remembrance Day"  => "#Dec/7", | 
| 430 |  |  |  |  |  |  | "Winter Solstice"               => "#Dec/21", | 
| 431 |  |  |  |  |  |  | "Christmas Eve"                 => "#Dec/24", | 
| 432 |  |  |  |  |  |  | "New Year's Eve"                => "#Dec/31" | 
| 433 |  |  |  |  |  |  | }; | 
| 434 |  |  |  |  |  |  |  | 
| 435 |  |  |  |  |  |  | sub US_New_Year # First of January | 
| 436 |  |  |  |  |  |  | { | 
| 437 | 61 |  |  | 61 | 0 | 91 | my($year,$label) = @_; | 
| 438 | 61 |  |  |  |  | 136 | return( &Next_Monday($year,1,1) ); | 
| 439 |  |  |  |  |  |  | } | 
| 440 |  |  |  |  |  |  | sub US_Independence # Fourth of July | 
| 441 |  |  |  |  |  |  | { | 
| 442 | 61 |  |  | 61 | 0 | 83 | my($year,$label) = @_; | 
| 443 | 61 |  |  |  |  | 130 | return( &Nearest_Workday($year,7,4) ); | 
| 444 |  |  |  |  |  |  | } | 
| 445 |  |  |  |  |  |  | sub US_Labor # First Monday after the first Sunday in September | 
| 446 |  |  |  |  |  |  | { | 
| 447 | 0 |  |  | 0 | 0 | 0 | my($year,$label) = @_; | 
| 448 | 0 |  |  |  |  | 0 | return( Add_Delta_Days( | 
| 449 |  |  |  |  |  |  | Nth_Weekday_of_Month_Year($year,9,7,1), +1) ); | 
| 450 |  |  |  |  |  |  | } | 
| 451 |  |  |  |  |  |  | sub US_Election # First Tuesday after the first Monday in November | 
| 452 |  |  |  |  |  |  | { | 
| 453 | 61 |  |  | 61 | 0 | 97 | my($year,$label) = @_; | 
| 454 | 61 |  |  |  |  | 164 | return( Add_Delta_Days( | 
| 455 |  |  |  |  |  |  | Nth_Weekday_of_Month_Year($year,11,1,1), +1), '#' ); | 
| 456 |  |  |  |  |  |  | } | 
| 457 |  |  |  |  |  |  | sub US_Veteran # 11th of November | 
| 458 |  |  |  |  |  |  | { | 
| 459 | 61 |  |  | 61 | 0 | 84 | my($year,$label) = @_; | 
| 460 | 61 |  |  |  |  | 155 | return( &Nearest_Workday($year,11,11) ); | 
| 461 |  |  |  |  |  |  | } | 
| 462 |  |  |  |  |  |  | sub US_Christmas # 25th of December | 
| 463 |  |  |  |  |  |  | { | 
| 464 | 61 |  |  | 61 | 0 | 94 | my($year,$label) = @_; | 
| 465 | 61 |  |  |  |  | 134 | return( &Next_Monday($year,12,25) ); | 
| 466 |  |  |  |  |  |  | } | 
| 467 |  |  |  |  |  |  |  | 
| 468 |  |  |  |  |  |  | $Profiles->{'US-AK'} = # Alaska | 
| 469 |  |  |  |  |  |  | { | 
| 470 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 471 |  |  |  |  |  |  | }; | 
| 472 |  |  |  |  |  |  | $Profiles->{'US-AL'} = # Alabama | 
| 473 |  |  |  |  |  |  | { | 
| 474 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 475 |  |  |  |  |  |  | }; | 
| 476 |  |  |  |  |  |  | $Profiles->{'US-AR'} = # Arkansas | 
| 477 |  |  |  |  |  |  | { | 
| 478 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 479 |  |  |  |  |  |  | }; | 
| 480 |  |  |  |  |  |  | $Profiles->{'US-AS'} = # American Samoa | 
| 481 |  |  |  |  |  |  | { | 
| 482 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 483 |  |  |  |  |  |  | }; | 
| 484 |  |  |  |  |  |  | $Profiles->{'US-AZ'} = # Arizona | 
| 485 |  |  |  |  |  |  | { | 
| 486 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 487 |  |  |  |  |  |  | }; | 
| 488 |  |  |  |  |  |  | $Profiles->{'US-CA'} = # California | 
| 489 |  |  |  |  |  |  | { | 
| 490 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 491 |  |  |  |  |  |  | }; | 
| 492 |  |  |  |  |  |  | $Profiles->{'US-CO'} = # Colorado | 
| 493 |  |  |  |  |  |  | { | 
| 494 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 495 |  |  |  |  |  |  | }; | 
| 496 |  |  |  |  |  |  | $Profiles->{'US-CT'} = # Connecticut | 
| 497 |  |  |  |  |  |  | { | 
| 498 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 499 |  |  |  |  |  |  | }; | 
| 500 |  |  |  |  |  |  | $Profiles->{'US-DC'} = # District of Columbia | 
| 501 |  |  |  |  |  |  | { | 
| 502 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 503 |  |  |  |  |  |  | }; | 
| 504 |  |  |  |  |  |  | $Profiles->{'US-DE'} = # Delaware | 
| 505 |  |  |  |  |  |  | { | 
| 506 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 507 |  |  |  |  |  |  | }; | 
| 508 |  |  |  |  |  |  | $Profiles->{'US-FL'} = # Florida | 
| 509 |  |  |  |  |  |  | { | 
| 510 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 511 |  |  |  |  |  |  | }; | 
| 512 |  |  |  |  |  |  | $Profiles->{'US-FM'} = # Federated States of Micronesia | 
| 513 |  |  |  |  |  |  | { | 
| 514 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 515 |  |  |  |  |  |  | }; | 
| 516 |  |  |  |  |  |  | $Profiles->{'US-GA'} = # Georgia | 
| 517 |  |  |  |  |  |  | { | 
| 518 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 519 |  |  |  |  |  |  | }; | 
| 520 |  |  |  |  |  |  | $Profiles->{'US-GU'} = # Guam | 
| 521 |  |  |  |  |  |  | { | 
| 522 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 523 |  |  |  |  |  |  | }; | 
| 524 |  |  |  |  |  |  | $Profiles->{'US-HI'} = # Hawaii | 
| 525 |  |  |  |  |  |  | { | 
| 526 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 527 |  |  |  |  |  |  | }; | 
| 528 |  |  |  |  |  |  | $Profiles->{'US-IA'} = # Iowa | 
| 529 |  |  |  |  |  |  | { | 
| 530 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 531 |  |  |  |  |  |  | }; | 
| 532 |  |  |  |  |  |  | $Profiles->{'US-ID'} = # Idaho | 
| 533 |  |  |  |  |  |  | { | 
| 534 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 535 |  |  |  |  |  |  | }; | 
| 536 |  |  |  |  |  |  | $Profiles->{'US-IL'} = # Illinois | 
| 537 |  |  |  |  |  |  | { | 
| 538 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 539 |  |  |  |  |  |  | }; | 
| 540 |  |  |  |  |  |  | $Profiles->{'US-IN'} = # Indiana | 
| 541 |  |  |  |  |  |  | { | 
| 542 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 543 |  |  |  |  |  |  | }; | 
| 544 |  |  |  |  |  |  | $Profiles->{'US-KS'} = # Kansas | 
| 545 |  |  |  |  |  |  | { | 
| 546 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 547 |  |  |  |  |  |  | }; | 
| 548 |  |  |  |  |  |  | $Profiles->{'US-KY'} = # Kentucky | 
| 549 |  |  |  |  |  |  | { | 
| 550 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 551 |  |  |  |  |  |  | }; | 
| 552 |  |  |  |  |  |  | $Profiles->{'US-LA'} = # Louisiana | 
| 553 |  |  |  |  |  |  | { | 
| 554 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 555 |  |  |  |  |  |  | }; | 
| 556 |  |  |  |  |  |  | $Profiles->{'US-MA'} = # Massachusetts | 
| 557 |  |  |  |  |  |  | { | 
| 558 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 559 |  |  |  |  |  |  | }; | 
| 560 |  |  |  |  |  |  | $Profiles->{'US-MD'} = # Maryland | 
| 561 |  |  |  |  |  |  | { | 
| 562 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 563 |  |  |  |  |  |  | }; | 
| 564 |  |  |  |  |  |  | $Profiles->{'US-ME'} = # Maine | 
| 565 |  |  |  |  |  |  | { | 
| 566 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 567 |  |  |  |  |  |  | }; | 
| 568 |  |  |  |  |  |  | $Profiles->{'US-MH'} = # Marshall Islands | 
| 569 |  |  |  |  |  |  | { | 
| 570 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 571 |  |  |  |  |  |  | }; | 
| 572 |  |  |  |  |  |  | $Profiles->{'US-MI'} = # Michigan | 
| 573 |  |  |  |  |  |  | { | 
| 574 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 575 |  |  |  |  |  |  | }; | 
| 576 |  |  |  |  |  |  | $Profiles->{'US-MN'} = # Minnesota | 
| 577 |  |  |  |  |  |  | { | 
| 578 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 579 |  |  |  |  |  |  | }; | 
| 580 |  |  |  |  |  |  | $Profiles->{'US-MO'} = # Missouri | 
| 581 |  |  |  |  |  |  | { | 
| 582 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 583 |  |  |  |  |  |  | }; | 
| 584 |  |  |  |  |  |  | $Profiles->{'US-MP'} = # Northern Mariana Islands | 
| 585 |  |  |  |  |  |  | { | 
| 586 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 587 |  |  |  |  |  |  | }; | 
| 588 |  |  |  |  |  |  | $Profiles->{'US-MS'} = # Mississippi | 
| 589 |  |  |  |  |  |  | { | 
| 590 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 591 |  |  |  |  |  |  | }; | 
| 592 |  |  |  |  |  |  | $Profiles->{'US-MT'} = # Montana | 
| 593 |  |  |  |  |  |  | { | 
| 594 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 595 |  |  |  |  |  |  | }; | 
| 596 |  |  |  |  |  |  | $Profiles->{'US-NC'} = # North Carolina | 
| 597 |  |  |  |  |  |  | { | 
| 598 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 599 |  |  |  |  |  |  | }; | 
| 600 |  |  |  |  |  |  | $Profiles->{'US-ND'} = # North Dakota | 
| 601 |  |  |  |  |  |  | { | 
| 602 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 603 |  |  |  |  |  |  | }; | 
| 604 |  |  |  |  |  |  | $Profiles->{'US-NE'} = # Nebraska | 
| 605 |  |  |  |  |  |  | { | 
| 606 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 607 |  |  |  |  |  |  | }; | 
| 608 |  |  |  |  |  |  | $Profiles->{'US-NH'} = # New Hampshire | 
| 609 |  |  |  |  |  |  | { | 
| 610 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 611 |  |  |  |  |  |  | }; | 
| 612 |  |  |  |  |  |  | $Profiles->{'US-NJ'} = # New Jersey | 
| 613 |  |  |  |  |  |  | { | 
| 614 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 615 |  |  |  |  |  |  | }; | 
| 616 |  |  |  |  |  |  | $Profiles->{'US-NM'} = # New Mexico | 
| 617 |  |  |  |  |  |  | { | 
| 618 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 619 |  |  |  |  |  |  | }; | 
| 620 |  |  |  |  |  |  | $Profiles->{'US-NV'} = # Nevada | 
| 621 |  |  |  |  |  |  | { | 
| 622 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 623 |  |  |  |  |  |  | }; | 
| 624 |  |  |  |  |  |  | $Profiles->{'US-NY'} = # New York | 
| 625 |  |  |  |  |  |  | { | 
| 626 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 627 |  |  |  |  |  |  | }; | 
| 628 |  |  |  |  |  |  | $Profiles->{'US-OH'} = # Ohio | 
| 629 |  |  |  |  |  |  | { | 
| 630 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 631 |  |  |  |  |  |  | }; | 
| 632 |  |  |  |  |  |  | $Profiles->{'US-OK'} = # Oklahoma | 
| 633 |  |  |  |  |  |  | { | 
| 634 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 635 |  |  |  |  |  |  | }; | 
| 636 |  |  |  |  |  |  | $Profiles->{'US-OR'} = # Oregon | 
| 637 |  |  |  |  |  |  | { | 
| 638 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 639 |  |  |  |  |  |  | }; | 
| 640 |  |  |  |  |  |  | $Profiles->{'US-PA'} = # Pennsylvania | 
| 641 |  |  |  |  |  |  | { | 
| 642 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 643 |  |  |  |  |  |  | }; | 
| 644 |  |  |  |  |  |  | $Profiles->{'US-PR'} = # Puerto Rico | 
| 645 |  |  |  |  |  |  | { | 
| 646 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 647 |  |  |  |  |  |  | }; | 
| 648 |  |  |  |  |  |  | $Profiles->{'US-PW'} = # Palau | 
| 649 |  |  |  |  |  |  | { | 
| 650 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 651 |  |  |  |  |  |  | }; | 
| 652 |  |  |  |  |  |  | $Profiles->{'US-RI'} = # Rhode Island | 
| 653 |  |  |  |  |  |  | { | 
| 654 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 655 |  |  |  |  |  |  | }; | 
| 656 |  |  |  |  |  |  | $Profiles->{'US-SC'} = # South Carolina | 
| 657 |  |  |  |  |  |  | { | 
| 658 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 659 |  |  |  |  |  |  | }; | 
| 660 |  |  |  |  |  |  | $Profiles->{'US-SD'} = # South Dakota | 
| 661 |  |  |  |  |  |  | { | 
| 662 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 663 |  |  |  |  |  |  | }; | 
| 664 |  |  |  |  |  |  | $Profiles->{'US-TN'} = # Tennessee | 
| 665 |  |  |  |  |  |  | { | 
| 666 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 667 |  |  |  |  |  |  | }; | 
| 668 |  |  |  |  |  |  | $Profiles->{'US-TX'} = # Texas | 
| 669 |  |  |  |  |  |  | { | 
| 670 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 671 |  |  |  |  |  |  | }; | 
| 672 |  |  |  |  |  |  | $Profiles->{'US-UT'} = # Utah | 
| 673 |  |  |  |  |  |  | { | 
| 674 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 675 |  |  |  |  |  |  | }; | 
| 676 |  |  |  |  |  |  | $Profiles->{'US-VA'} = # Virginia | 
| 677 |  |  |  |  |  |  | { | 
| 678 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 679 |  |  |  |  |  |  | }; | 
| 680 |  |  |  |  |  |  | $Profiles->{'US-VI'} = # Virgin Islands | 
| 681 |  |  |  |  |  |  | { | 
| 682 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 683 |  |  |  |  |  |  | }; | 
| 684 |  |  |  |  |  |  | $Profiles->{'US-VT'} = # Vermont | 
| 685 |  |  |  |  |  |  | { | 
| 686 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 687 |  |  |  |  |  |  | }; | 
| 688 |  |  |  |  |  |  | $Profiles->{'US-WA'} = # Washington | 
| 689 |  |  |  |  |  |  | { | 
| 690 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 691 |  |  |  |  |  |  | }; | 
| 692 |  |  |  |  |  |  | $Profiles->{'US-WI'} = # Wisconsin | 
| 693 |  |  |  |  |  |  | { | 
| 694 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 695 |  |  |  |  |  |  | }; | 
| 696 |  |  |  |  |  |  | $Profiles->{'US-WV'} = # West Virginia | 
| 697 |  |  |  |  |  |  | { | 
| 698 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 699 |  |  |  |  |  |  | }; | 
| 700 |  |  |  |  |  |  | $Profiles->{'US-WY'} = # Wyoming | 
| 701 |  |  |  |  |  |  | { | 
| 702 |  |  |  |  |  |  | %{$Profiles->{'US'}} | 
| 703 |  |  |  |  |  |  | }; | 
| 704 |  |  |  |  |  |  |  | 
| 705 |  |  |  |  |  |  | # Thanks to: | 
| 706 |  |  |  |  |  |  | # M Lyons | 
| 707 |  |  |  |  |  |  | # Larry Rosler | 
| 708 |  |  |  |  |  |  | # Geoff Baskwill | 
| 709 |  |  |  |  |  |  | # Simon Perreault | 
| 710 |  |  |  |  |  |  |  | 
| 711 |  |  |  |  |  |  | $Profiles->{'CA'} = # Canada | 
| 712 |  |  |  |  |  |  | { | 
| 713 |  |  |  |  |  |  | "New Year's Day"       => "Jan/01", | 
| 714 |  |  |  |  |  |  | "Good Friday"          => "-2", | 
| 715 |  |  |  |  |  |  | "Labour Day"           => "1/Mon/Sep", | 
| 716 |  |  |  |  |  |  | "Christmas Day"        => "Dec/25" | 
| 717 |  |  |  |  |  |  | }; | 
| 718 |  |  |  |  |  |  |  | 
| 719 |  |  |  |  |  |  | sub CA_QC_Dollard # First Monday before May 25 | 
| 720 |  |  |  |  |  |  | { | 
| 721 | 1 |  |  | 1 | 0 | 3 | my($year,$label) = @_; | 
| 722 | 1 |  |  |  |  | 4 | my($dow) = Day_of_Week($year, 5, 25); | 
| 723 | 1 |  |  |  |  | 6 | return( Add_Delta_Days($year, 5, 25, 1-$dow) ); | 
| 724 |  |  |  |  |  |  | } | 
| 725 |  |  |  |  |  |  |  | 
| 726 |  |  |  |  |  |  | $Profiles->{'CA-AB'} = # Alberta | 
| 727 |  |  |  |  |  |  | { | 
| 728 |  |  |  |  |  |  | %{$Profiles->{'CA'}}, | 
| 729 |  |  |  |  |  |  | "Family Day"           => "3/Mon/Feb", | 
| 730 |  |  |  |  |  |  | "Victoria Day"         => "May/22", | 
| 731 |  |  |  |  |  |  | "Canada Day"           => "Jul/01", | 
| 732 |  |  |  |  |  |  | "Thanksgiving Day"     => "2/Mon/Oct", | 
| 733 |  |  |  |  |  |  | "Remembrance Day"      => "Nov/11" | 
| 734 |  |  |  |  |  |  | }; | 
| 735 |  |  |  |  |  |  | $Profiles->{'CA-BC'} = # British Columbia | 
| 736 |  |  |  |  |  |  | { | 
| 737 |  |  |  |  |  |  | %{$Profiles->{'CA'}}, | 
| 738 |  |  |  |  |  |  | "Victoria Day"         => "May/22", | 
| 739 |  |  |  |  |  |  | "Canada Day"           => "Jul/01", | 
| 740 |  |  |  |  |  |  | "British Columbia Day" => "1/Mon/Aug", | 
| 741 |  |  |  |  |  |  | "Thanksgiving Day"     => "2/Mon/Oct", | 
| 742 |  |  |  |  |  |  | "Remembrance Day"      => "Nov/11" | 
| 743 |  |  |  |  |  |  | }; | 
| 744 |  |  |  |  |  |  | $Profiles->{'CA-MB'} = # Manitoba | 
| 745 |  |  |  |  |  |  | { | 
| 746 |  |  |  |  |  |  | %{$Profiles->{'CA'}}, | 
| 747 |  |  |  |  |  |  | "Victoria Day"         => "May/22", | 
| 748 |  |  |  |  |  |  | "Canada Day"           => "Jul/01", | 
| 749 |  |  |  |  |  |  | "Thanksgiving Day"     => "2/Mon/Oct" | 
| 750 |  |  |  |  |  |  | }; | 
| 751 |  |  |  |  |  |  | $Profiles->{'CA-NB'} = # New Brunswick | 
| 752 |  |  |  |  |  |  | { | 
| 753 |  |  |  |  |  |  | %{$Profiles->{'CA'}}, | 
| 754 |  |  |  |  |  |  | "Canada Day"           => "Jul/01", | 
| 755 |  |  |  |  |  |  | "New Brunswick Day"    => "1/Mon/Aug" | 
| 756 |  |  |  |  |  |  | }; | 
| 757 |  |  |  |  |  |  | $Profiles->{'CA-NF'} = # Newfoundland | 
| 758 |  |  |  |  |  |  | { | 
| 759 |  |  |  |  |  |  | %{$Profiles->{'CA'}}, | 
| 760 |  |  |  |  |  |  | "Memorial Day"         => "Jul/01" | 
| 761 |  |  |  |  |  |  | }; | 
| 762 |  |  |  |  |  |  | $Profiles->{'CA-NS'} = # Nova Scotia | 
| 763 |  |  |  |  |  |  | { | 
| 764 |  |  |  |  |  |  | %{$Profiles->{'CA'}}, | 
| 765 |  |  |  |  |  |  | "Canada Day"           => "Jul/01" | 
| 766 |  |  |  |  |  |  | }; | 
| 767 |  |  |  |  |  |  | $Profiles->{'CA-NT'} = # Northwest Territories and Nunavut | 
| 768 |  |  |  |  |  |  | { | 
| 769 |  |  |  |  |  |  | %{$Profiles->{'CA'}}, | 
| 770 |  |  |  |  |  |  | "Victoria Day"         => "May/22", | 
| 771 |  |  |  |  |  |  | "Canada Day"           => "Jul/01", | 
| 772 |  |  |  |  |  |  | "Thanksgiving Day"     => "2/Mon/Oct", | 
| 773 |  |  |  |  |  |  | "Remembrance Day"      => "Nov/11" | 
| 774 |  |  |  |  |  |  | }; | 
| 775 |  |  |  |  |  |  | $Profiles->{'CA-ON'} = # Ontario | 
| 776 |  |  |  |  |  |  | { | 
| 777 |  |  |  |  |  |  | %{$Profiles->{'CA'}}, | 
| 778 |  |  |  |  |  |  | "Victoria Day"         => "May/22", | 
| 779 |  |  |  |  |  |  | "Canada Day"           => "Jul/01", | 
| 780 |  |  |  |  |  |  | "Family Day"           => "3/Mon/Feb", # Thanks to | 
| 781 |  |  |  |  |  |  | "Civic Holiday"        => "1/Mon/Aug", # Iain Dwyer | 
| 782 |  |  |  |  |  |  | "Thanksgiving Day"     => "2/Mon/Oct", | 
| 783 |  |  |  |  |  |  | "Boxing Day"           => "Dec/26" | 
| 784 |  |  |  |  |  |  | }; | 
| 785 |  |  |  |  |  |  | $Profiles->{'CA-PE'} = # Prince Edward Island | 
| 786 |  |  |  |  |  |  | { | 
| 787 |  |  |  |  |  |  | %{$Profiles->{'CA'}}, | 
| 788 |  |  |  |  |  |  | "Canada Day"           => "Jul/01" | 
| 789 |  |  |  |  |  |  | }; | 
| 790 |  |  |  |  |  |  | $Profiles->{'CA-QC'} = # Québec | 
| 791 |  |  |  |  |  |  | { | 
| 792 |  |  |  |  |  |  | "Jour de l'an"         => "Jan/01", | 
| 793 |  |  |  |  |  |  | "Vendredi Saint"       => "-2", | 
| 794 |  |  |  |  |  |  | "Pâques"               => "+0", | 
| 795 |  |  |  |  |  |  | "Lundi de Pâques"      => "+1", | 
| 796 |  |  |  |  |  |  | "Fête de Dollard"      => \&CA_QC_Dollard, | 
| 797 |  |  |  |  |  |  | "Fête du Québec"       => "Jun/24", | 
| 798 |  |  |  |  |  |  | "Fête du Canada"       => "Jul/01", | 
| 799 |  |  |  |  |  |  | "Fête du Travail"      => "1/Mon/Sep", | 
| 800 |  |  |  |  |  |  | "Action de Grâce"      => "2/Mon/Oct", | 
| 801 |  |  |  |  |  |  | "Noël"                 => "Dec/25" | 
| 802 |  |  |  |  |  |  | }; | 
| 803 |  |  |  |  |  |  | $Profiles->{'CA-SK'} = # Saskatchewan | 
| 804 |  |  |  |  |  |  | { | 
| 805 |  |  |  |  |  |  | %{$Profiles->{'CA'}}, | 
| 806 |  |  |  |  |  |  | "Victoria Day"         => "May/22", | 
| 807 |  |  |  |  |  |  | "Canada Day"           => "Jul/01", | 
| 808 |  |  |  |  |  |  | "Saskatchewan Day"     => "1/Mon/Aug", | 
| 809 |  |  |  |  |  |  | "Thanksgiving Day"     => "2/Mon/Oct", | 
| 810 |  |  |  |  |  |  | "Remembrance Day"      => "Nov/11" | 
| 811 |  |  |  |  |  |  | }; | 
| 812 |  |  |  |  |  |  | $Profiles->{'CA-YK'} = # Yukon Territory | 
| 813 |  |  |  |  |  |  | { | 
| 814 |  |  |  |  |  |  | %{$Profiles->{'CA'}}, | 
| 815 |  |  |  |  |  |  | "Victoria Day"         => "May/22", | 
| 816 |  |  |  |  |  |  | "Canada Day"           => "Jul/01", | 
| 817 |  |  |  |  |  |  | "Discovery Day"        => "3/Mon/Aug", | 
| 818 |  |  |  |  |  |  | "Thanksgiving Day"     => "2/Mon/Oct", | 
| 819 |  |  |  |  |  |  | "Remembrance Day"      => "Nov/11" | 
| 820 |  |  |  |  |  |  | }; | 
| 821 |  |  |  |  |  |  |  | 
| 822 |  |  |  |  |  |  | # Thanks to: | 
| 823 |  |  |  |  |  |  | # Nora Elia Castillo | 
| 824 |  |  |  |  |  |  |  | 
| 825 |  |  |  |  |  |  | $Profiles->{'MX'} = # Mexico | 
| 826 |  |  |  |  |  |  | { | 
| 827 |  |  |  |  |  |  | "Año Nuevo"                    => "01-01", | 
| 828 |  |  |  |  |  |  | "Día de la Constitución"       => "05-02", | 
| 829 |  |  |  |  |  |  | "Natalicio de Benito Juarez"   => "21-03", | 
| 830 |  |  |  |  |  |  | "Día del Trabajo"              => "01-05", | 
| 831 |  |  |  |  |  |  | "Día de la Independencia"      => "16-09", | 
| 832 |  |  |  |  |  |  | "Revolución Mexicana"          => "20-11", | 
| 833 |  |  |  |  |  |  | "Navidad"                      => "25-12" | 
| 834 |  |  |  |  |  |  | }; | 
| 835 |  |  |  |  |  |  |  | 
| 836 |  |  |  |  |  |  | # Thanks to: | 
| 837 |  |  |  |  |  |  | # Slawek Szmyd | 
| 838 |  |  |  |  |  |  | # Marcin Wlazlowski | 
| 839 |  |  |  |  |  |  |  | 
| 840 |  |  |  |  |  |  | $Profiles->{'PL'} = # Polska | 
| 841 |  |  |  |  |  |  | { | 
| 842 |  |  |  |  |  |  | "Nowy Rok"                             => "01.01.", | 
| 843 |  |  |  |  |  |  | "Trzech Kroli"                         => "#06.01.", | 
| 844 |  |  |  |  |  |  | "Dzien Babci"                          => "#21.01.", | 
| 845 |  |  |  |  |  |  | "Dzien Dziadka"                        => "#22.01.", | 
| 846 |  |  |  |  |  |  | "Walentynki"                           => "#14.02.", | 
| 847 |  |  |  |  |  |  | "Dzien Kobiet"                         => "#08.03.", | 
| 848 |  |  |  |  |  |  |  | 
| 849 |  |  |  |  |  |  | "Tlusty Czwartek"                      => "#-52", | 
| 850 |  |  |  |  |  |  | "Ostatki"                              => "#-47", | 
| 851 |  |  |  |  |  |  | "Sroda Popielcowa"                     => "#-46", | 
| 852 |  |  |  |  |  |  | "Niedziela Palmowa"                    => "#-7", | 
| 853 |  |  |  |  |  |  | "Wielkanoc"                            => "+0", | 
| 854 |  |  |  |  |  |  | "Poniedzialek Wielkanocny"             => "+1", | 
| 855 |  |  |  |  |  |  | "Zielone Swiatki"                      => "#+49", | 
| 856 |  |  |  |  |  |  | "Boze Cialo"                           => "+60", | 
| 857 |  |  |  |  |  |  |  | 
| 858 |  |  |  |  |  |  | "Prima Aprilis"                        => "#01.04.", | 
| 859 |  |  |  |  |  |  | "Swieto Pracy"                         => "01.05.", | 
| 860 |  |  |  |  |  |  | "Swieto Narodowe 3 Maja"               => "03.05.", | 
| 861 |  |  |  |  |  |  | "Dzien Matki"                          => "#26.05.", | 
| 862 |  |  |  |  |  |  | "Dzien Dziecka"                        => "#01.06.", | 
| 863 |  |  |  |  |  |  | "Dzien Ojca"                           => "#23.06.", | 
| 864 |  |  |  |  |  |  | "Wniebowziecie NMP"                    => "15.08.", | 
| 865 |  |  |  |  |  |  | "Dzien Nauczyciela"                    => "#14.10.", | 
| 866 |  |  |  |  |  |  | "Halloween"                            => "#Oct/31", | 
| 867 |  |  |  |  |  |  | "Wszystkich Swietych"                  => "01.11.", | 
| 868 |  |  |  |  |  |  | "Dzien Zaduszny"                       => "#02.11", | 
| 869 |  |  |  |  |  |  | "Narodowe Swieto Niepodleglosci"       => "11.11.", | 
| 870 |  |  |  |  |  |  | "Andrzejki"                            => "#30.11.", | 
| 871 |  |  |  |  |  |  | "Mikolajki"                            => "#06.12.", | 
| 872 |  |  |  |  |  |  | "Wigilia"                              => "#24.12.", | 
| 873 |  |  |  |  |  |  | "Boze Narodzenie pierwszy dzien Swiat" => "25.12.", | 
| 874 |  |  |  |  |  |  | "Boze Narodzenie drugi dzien Swiat"    => "26.12.", | 
| 875 |  |  |  |  |  |  | "Sylwester"                            => "#31.12." | 
| 876 |  |  |  |  |  |  | }; | 
| 877 |  |  |  |  |  |  |  | 
| 878 |  |  |  |  |  |  | $Profiles->{'PL-SW'} = # kalendarz z wieksza iloscia Swiat | 
| 879 |  |  |  |  |  |  | { | 
| 880 |  |  |  |  |  |  | %{$Profiles->{'PL'}}, | 
| 881 |  |  |  |  |  |  | "Wielki Czwartek"                      => "#-3", | 
| 882 |  |  |  |  |  |  | "Wielki Piatek"                        => "#-2", | 
| 883 |  |  |  |  |  |  | "Poczatek Adwentu"                     => \&Advent1, | 
| 884 |  |  |  |  |  |  | "Swieto Dziekczynienia"                => "#4/Thu/Nov" | 
| 885 |  |  |  |  |  |  | }; | 
| 886 |  |  |  |  |  |  |  | 
| 887 |  |  |  |  |  |  | ## ISO-Latin-2: | 
| 888 |  |  |  |  |  |  | # | 
| 889 |  |  |  |  |  |  | ## Thanks to: | 
| 890 |  |  |  |  |  |  | ## S³awek Szmyd | 
| 891 |  |  |  |  |  |  | ## Marcin Wlaz³owski | 
| 892 |  |  |  |  |  |  | # | 
| 893 |  |  |  |  |  |  | #$Profiles->{'PL'} = # Polska | 
| 894 |  |  |  |  |  |  | #{ | 
| 895 |  |  |  |  |  |  | #    "Nowy Rok"                             => "01.01.", | 
| 896 |  |  |  |  |  |  | #    "Trzech Króli"                         => "#06.01.", | 
| 897 |  |  |  |  |  |  | #    "Dzieñ Babci"                          => "#21.01.", | 
| 898 |  |  |  |  |  |  | #    "Dzieñ Dziadka"                        => "#22.01.", | 
| 899 |  |  |  |  |  |  | #    "Walentynki"                           => "#14.02.", | 
| 900 |  |  |  |  |  |  | #    "Dzieñ Kobiet"                         => "#08.03.", | 
| 901 |  |  |  |  |  |  | # | 
| 902 |  |  |  |  |  |  | #    "T³usty Czwartek"                      => "#-52", | 
| 903 |  |  |  |  |  |  | #    "Ostatki"                              => "#-47", | 
| 904 |  |  |  |  |  |  | #    "¦roda Polpielcowa"                    => "#-46", | 
| 905 |  |  |  |  |  |  | #    "Niedziela Palmowa"                    => "#-7", | 
| 906 |  |  |  |  |  |  | #    "Wielkanoc"                            => "+0", | 
| 907 |  |  |  |  |  |  | #    "Poniedzia³ek Wielkanocny"             => "+1", | 
| 908 |  |  |  |  |  |  | #    "Zielone ¦wi±tki"                      => "#+49", | 
| 909 |  |  |  |  |  |  | #    "Bo¿e Cia³o"                           => "+60", | 
| 910 |  |  |  |  |  |  | # | 
| 911 |  |  |  |  |  |  | #    "Prima Aprilis"                        => "#01.04.", | 
| 912 |  |  |  |  |  |  | #    "¦wiêto Pracy"                         => "01.05.", | 
| 913 |  |  |  |  |  |  | #    "¦wiêto Narodowe 3 Maja"               => "03.05.", | 
| 914 |  |  |  |  |  |  | #    "Dzieñ Matki"                          => "#26.05.", | 
| 915 |  |  |  |  |  |  | #    "Dzieñ Dziecka"                        => "#01.06.", | 
| 916 |  |  |  |  |  |  | #    "Dzieñ Ojca"                           => "#23.06.", | 
| 917 |  |  |  |  |  |  | #    "Wniebowziêcie NMP"                    => "15.08.", | 
| 918 |  |  |  |  |  |  | #    "Dzieñ Nauczyciela"                    => "#14.10.", | 
| 919 |  |  |  |  |  |  | #    "Halloween"                            => "#Oct/31", | 
| 920 |  |  |  |  |  |  | #    "Wszystkich ¦wiêtych"                  => "01.11.", | 
| 921 |  |  |  |  |  |  | #    "Dzieñ Zaduszny"                       => "#02.11", | 
| 922 |  |  |  |  |  |  | #    "Narodowe ¦wiêto Niepodleg³o¶ci"       => "11.11.", | 
| 923 |  |  |  |  |  |  | #    "Andrzejki"                            => "#30.11.", | 
| 924 |  |  |  |  |  |  | #    "Miko³ajki"                            => "#06.12.", | 
| 925 |  |  |  |  |  |  | #    "Wigilia"                              => "#24.12.", | 
| 926 |  |  |  |  |  |  | #    "Bo¿e Narodzenie pierwszy dzieñ ¦wi±t" => "25.12.", | 
| 927 |  |  |  |  |  |  | #    "Bo¿e Narodzenie drugi dzieñ ¦wi±t"    => "26.12.", | 
| 928 |  |  |  |  |  |  | #    "Sylwester"                            => "#31.12." | 
| 929 |  |  |  |  |  |  | #}; | 
| 930 |  |  |  |  |  |  | # | 
| 931 |  |  |  |  |  |  | #$Profiles->{'PL-SW'} = # kalendarz z wieksza iloscia Swiat | 
| 932 |  |  |  |  |  |  | #{ | 
| 933 |  |  |  |  |  |  | #    %{$Profiles->{'PL'}}, | 
| 934 |  |  |  |  |  |  | #    "Wielki Czwartek"                      => "#-3", | 
| 935 |  |  |  |  |  |  | #    "Wielki Pi±tek"                        => "#-2", | 
| 936 |  |  |  |  |  |  | #    "Pocz±tek Adwentu"                     => \&Advent1, | 
| 937 |  |  |  |  |  |  | #    "¦wiêto Dziêkczynienia"                => "#4/Thu/Nov" | 
| 938 |  |  |  |  |  |  | #}; | 
| 939 |  |  |  |  |  |  |  | 
| 940 |  |  |  |  |  |  | $Profiles->{'AT'} = # Österreich | 
| 941 |  |  |  |  |  |  | { | 
| 942 |  |  |  |  |  |  | "Neujahr"                   => "01.01.", | 
| 943 |  |  |  |  |  |  | "Dreikönigstag"             => "06.01.", | 
| 944 |  |  |  |  |  |  | "Karfreitag"                => "#-2", # regional unterschiedlich | 
| 945 |  |  |  |  |  |  | "Ostersonntag"              => "+0", | 
| 946 |  |  |  |  |  |  | "Ostermontag"               => "+1", | 
| 947 |  |  |  |  |  |  | "Staatsfeiertag"            => "01.05.", | 
| 948 |  |  |  |  |  |  | "Christi Himmelfahrt"       => "+39", | 
| 949 |  |  |  |  |  |  | "Pfingstsonntag"            => "+49", | 
| 950 |  |  |  |  |  |  | "Pfingstmontag"             => "+50", | 
| 951 |  |  |  |  |  |  | "Fronleichnam"              => "+60", | 
| 952 |  |  |  |  |  |  | "Mariä Himmelfahrt"         => "15.08.", | 
| 953 |  |  |  |  |  |  | "Nationalfeiertag"          => "26.10.", | 
| 954 |  |  |  |  |  |  | "Allerheiligen"             => "01.11.", | 
| 955 |  |  |  |  |  |  | "Mariä Empfängnis"          => "08.12.", | 
| 956 |  |  |  |  |  |  | "Christtag"                 => "25.12.", | 
| 957 |  |  |  |  |  |  | "Stephanitag"               => "26.12." | 
| 958 |  |  |  |  |  |  | }; | 
| 959 |  |  |  |  |  |  |  | 
| 960 |  |  |  |  |  |  | # Thanks to: | 
| 961 |  |  |  |  |  |  | # Herbert Liechti | 
| 962 |  |  |  |  |  |  | # Marco Hunn | 
| 963 |  |  |  |  |  |  | # Aldo Calpini | 
| 964 |  |  |  |  |  |  |  | 
| 965 |  |  |  |  |  |  | $Profiles->{'CH-DE'} = # Schweiz - Deutsch | 
| 966 |  |  |  |  |  |  | { | 
| 967 |  |  |  |  |  |  | "Neujahr"                   => "01.01.", | 
| 968 |  |  |  |  |  |  | "Dreikönigstag"             => "06.01.", | 
| 969 |  |  |  |  |  |  | "Karfreitag"                => "#-2", | 
| 970 |  |  |  |  |  |  | "Ostersonntag"              => "+0", | 
| 971 |  |  |  |  |  |  | "Ostermontag"               => "+1", | 
| 972 |  |  |  |  |  |  | "Auffahrt"                  => "+39", | 
| 973 |  |  |  |  |  |  | "Pfingstsonntag"            => "+49", | 
| 974 |  |  |  |  |  |  | "Pfingstmontag"             => "+50", | 
| 975 |  |  |  |  |  |  | "Fronleichnam"              => "#+60", | 
| 976 |  |  |  |  |  |  | "Bundesfeiertag"            => "01.08.", | 
| 977 |  |  |  |  |  |  | "Mariä Himmelfahrt"         => "#15.08.", | 
| 978 |  |  |  |  |  |  | "Allerheiligen"             => "#01.11.", | 
| 979 |  |  |  |  |  |  | "Weihnachten"               => "25.12.", | 
| 980 |  |  |  |  |  |  | "Stefanstag"                => "26.12." | 
| 981 |  |  |  |  |  |  | }; | 
| 982 |  |  |  |  |  |  | $Profiles->{'CH-FR'} = # Suisse - Français | 
| 983 |  |  |  |  |  |  | { | 
| 984 |  |  |  |  |  |  | "Nouvel An"                 => "01.01.", | 
| 985 |  |  |  |  |  |  | "Épiphanie"                 => "06.01.", | 
| 986 |  |  |  |  |  |  | "Vendredi Saint"            => "#-2", | 
| 987 |  |  |  |  |  |  | "Pâques"                    => "+0", | 
| 988 |  |  |  |  |  |  | "Lundi de Pâques"           => "+1", | 
| 989 |  |  |  |  |  |  | "L'Ascension"               => "+39", | 
| 990 |  |  |  |  |  |  | "La Pentecôte"              => "+49", | 
| 991 |  |  |  |  |  |  | "Lundi de Pentecôte"        => "+50", | 
| 992 |  |  |  |  |  |  | "Fête Dieu"                 => "#+60", | 
| 993 |  |  |  |  |  |  | "Fête fédérale"             => "01.08.", | 
| 994 |  |  |  |  |  |  | "Assomption"                => "#15.08.", | 
| 995 |  |  |  |  |  |  | "Toussaint"                 => "#01.11.", | 
| 996 |  |  |  |  |  |  | "Nöel"                      => "25.12.", | 
| 997 |  |  |  |  |  |  | "St. Etienne"               => "26.12." | 
| 998 |  |  |  |  |  |  | }; | 
| 999 |  |  |  |  |  |  | $Profiles->{'CH-IT'} = # Switzerland - Italian | 
| 1000 |  |  |  |  |  |  | { | 
| 1001 |  |  |  |  |  |  | "Capo d'Anno"               => "01.01.", | 
| 1002 |  |  |  |  |  |  | "Epifania"                  => "06.01.", | 
| 1003 |  |  |  |  |  |  | "Venerdì Santo"             => "#-2", | 
| 1004 |  |  |  |  |  |  | "Pasqua"                    => "+0", | 
| 1005 |  |  |  |  |  |  | "Lunedì di Pasqua"          => "+1", | 
| 1006 |  |  |  |  |  |  | "Ascensione"                => "+39", | 
| 1007 |  |  |  |  |  |  | "Pentecoste"                => "+49", | 
| 1008 |  |  |  |  |  |  | "Lunedì di Pentecoste"      => "+50", | 
| 1009 |  |  |  |  |  |  | "Corpus Domini"             => "#+60", | 
| 1010 |  |  |  |  |  |  | "Festa federale"            => "01.08.", | 
| 1011 |  |  |  |  |  |  | "Assunzione di M.V."        => "#15.08.", | 
| 1012 |  |  |  |  |  |  | "Ognissanti"                => "#01.11.", | 
| 1013 |  |  |  |  |  |  | "S. Natale"                 => "25.12.", | 
| 1014 |  |  |  |  |  |  | "S. Stefano"                => "26.12." | 
| 1015 |  |  |  |  |  |  | }; | 
| 1016 |  |  |  |  |  |  | $Profiles->{'CH-RM'} = # Swizra rumantscha (Switzerland - Rhaeto-Romance) | 
| 1017 |  |  |  |  |  |  | { | 
| 1018 |  |  |  |  |  |  | "Büman"                     => "01.01.", | 
| 1019 |  |  |  |  |  |  | "Di da la Babania"          => "#06.01.", | 
| 1020 |  |  |  |  |  |  | "Venderdi sonch"            => "-2", | 
| 1021 |  |  |  |  |  |  | "Dumengia da Pasqua"        => "+0", | 
| 1022 |  |  |  |  |  |  | "Firà da Pasqua"            => "+1", | 
| 1023 |  |  |  |  |  |  | "Ascensiun"                 => "+39", | 
| 1024 |  |  |  |  |  |  | "Dumengia da Tschinquaisma" => "+49", | 
| 1025 |  |  |  |  |  |  | "Firà da Tschinquaisma"     => "+50", | 
| 1026 |  |  |  |  |  |  | "Sonch sang"                => "#+60", | 
| 1027 |  |  |  |  |  |  | "Festa federala"            => "01.08.", | 
| 1028 |  |  |  |  |  |  | "Assunziun da Maria"        => "#15.08.", | 
| 1029 |  |  |  |  |  |  | "Festa da tuot ils sonchs"  => "#01.11.", | 
| 1030 |  |  |  |  |  |  | "Festa da Nadal"            => "25.12.", | 
| 1031 |  |  |  |  |  |  | "Stefan sonch"              => "26.12." | 
| 1032 |  |  |  |  |  |  | }; | 
| 1033 |  |  |  |  |  |  |  | 
| 1034 |  |  |  |  |  |  | # Thanks to: | 
| 1035 |  |  |  |  |  |  | # François Desarmenien | 
| 1036 |  |  |  |  |  |  | # Arnaud Calvo | 
| 1037 |  |  |  |  |  |  | # Jean Forget | 
| 1038 |  |  |  |  |  |  | # Cedric Bouvier | 
| 1039 |  |  |  |  |  |  | # Julien Quint | 
| 1040 |  |  |  |  |  |  |  | 
| 1041 |  |  |  |  |  |  | $Profiles->{'FR'} = # France | 
| 1042 |  |  |  |  |  |  | { | 
| 1043 |  |  |  |  |  |  | "Jour de l'An"              => "01.01.", | 
| 1044 |  |  |  |  |  |  | "Épiphanie"                   => "#06.01.", | 
| 1045 |  |  |  |  |  |  | "Chandeleur"                => "#02.02.", | 
| 1046 |  |  |  |  |  |  | "Mardi-Gras"                => "#-47", | 
| 1047 |  |  |  |  |  |  | "Mercredi des Cendres"      => "#-46", | 
| 1048 |  |  |  |  |  |  | "Dimanche des Rameaux"      => "-7", | 
| 1049 |  |  |  |  |  |  | "Pâques"                    => "+0", | 
| 1050 |  |  |  |  |  |  | "Lundi de Pâques"           => "+1", | 
| 1051 |  |  |  |  |  |  | "Fin de Guerre d'Algérie"   => "#19.03.", # Contrat d'Evian 19.03.1962 | 
| 1052 |  |  |  |  |  |  | "Fête du Travail"           => "01.05.", | 
| 1053 |  |  |  |  |  |  | "Victoire 1945"             => "08.05.", | 
| 1054 |  |  |  |  |  |  | "Saint Jean"                => "#24.06.", | 
| 1055 |  |  |  |  |  |  | "Ascension"                 => "+39", | 
| 1056 |  |  |  |  |  |  | "Pentecôte"                 => "+49", | 
| 1057 |  |  |  |  |  |  | "Lundi de Pentecôte"        => "+50", | 
| 1058 |  |  |  |  |  |  | "Fête Nationale"            => "14.07.", | 
| 1059 |  |  |  |  |  |  | "Assomption"                => "15.08.", | 
| 1060 |  |  |  |  |  |  | "Toussaint"                 => "01.11.", | 
| 1061 |  |  |  |  |  |  | "Jour des Défunts"          => "#02.11.", | 
| 1062 |  |  |  |  |  |  | "Saint Martin"              => "#11.11", | 
| 1063 |  |  |  |  |  |  | "Armistice 1918"            => "11.11.", | 
| 1064 |  |  |  |  |  |  | "Avent"                     => \&Advent1, | 
| 1065 |  |  |  |  |  |  | "Noël"                      => "25.12.", | 
| 1066 |  |  |  |  |  |  | "Saint Sylvestre"           => "#31.12." | 
| 1067 |  |  |  |  |  |  | }; | 
| 1068 |  |  |  |  |  |  |  | 
| 1069 |  |  |  |  |  |  | $Profiles->{'BE-DE'} = # Belgien | 
| 1070 |  |  |  |  |  |  | { | 
| 1071 |  |  |  |  |  |  | "Neujahr"                   => "01.01.", | 
| 1072 |  |  |  |  |  |  | "Dreikönigstag"             => "#06.01.", | 
| 1073 |  |  |  |  |  |  | "Lichtmesse"                => "#02.02.", | 
| 1074 |  |  |  |  |  |  | "Karnevalsdienstag"         => "#-47", | 
| 1075 |  |  |  |  |  |  | "Aschermittwoch"            => "#-46", | 
| 1076 |  |  |  |  |  |  | "Palmsonntag"               => "-7", | 
| 1077 |  |  |  |  |  |  | "Ostersonntag"              => "+0", | 
| 1078 |  |  |  |  |  |  | "Ostermontag"               => "+1", | 
| 1079 |  |  |  |  |  |  | "Tag der Arbeit"            => "01.05.", | 
| 1080 |  |  |  |  |  |  | "Christi Himmelfahrt"       => "+39", | 
| 1081 |  |  |  |  |  |  | "Pfingstsonntag"            => "+49", | 
| 1082 |  |  |  |  |  |  | "Pfingstmontag"             => "+50", | 
| 1083 |  |  |  |  |  |  | "Nationalfeiertag"          => "21.07.", | 
| 1084 |  |  |  |  |  |  | "Mariä Himmelfahrt"         => "15.08.", | 
| 1085 |  |  |  |  |  |  | "Allerheiligen"             => "01.11.", | 
| 1086 |  |  |  |  |  |  | "Allerseelen"               => "#02.11.", | 
| 1087 |  |  |  |  |  |  | "Waffenstillstand 1918"     => "11.11.", | 
| 1088 |  |  |  |  |  |  | "Weihnachten"               => "25.12.", | 
| 1089 |  |  |  |  |  |  | "2. Weihnachtsfeiertag"     => "#26.12.", | 
| 1090 |  |  |  |  |  |  | "Sylvester"                 => "#31.12." | 
| 1091 |  |  |  |  |  |  | }; | 
| 1092 |  |  |  |  |  |  |  | 
| 1093 |  |  |  |  |  |  | # Thanks to: | 
| 1094 |  |  |  |  |  |  | # Hendrik Van Belleghem | 
| 1095 |  |  |  |  |  |  | # Stefaan Colson | 
| 1096 |  |  |  |  |  |  |  | 
| 1097 |  |  |  |  |  |  | $Profiles->{'BE-NL'} = # België | 
| 1098 |  |  |  |  |  |  | { | 
| 1099 |  |  |  |  |  |  | "Nieuwjaar"                 => "01.01.", | 
| 1100 |  |  |  |  |  |  | "Driekoningen"              => "#06.01.", | 
| 1101 |  |  |  |  |  |  | "Lichtmis"                  => "#02.02.", | 
| 1102 |  |  |  |  |  |  | "Vastenavond"               => "#-47", | 
| 1103 |  |  |  |  |  |  | "Aswoensdag"                => "#-46", | 
| 1104 |  |  |  |  |  |  | "Palmzondag"                => "-7", | 
| 1105 |  |  |  |  |  |  | "Pasen"                     => "+0", | 
| 1106 |  |  |  |  |  |  | "Paasmaandag"               => "+1", | 
| 1107 |  |  |  |  |  |  | "Dag van de arbeid"         => "01.05.", | 
| 1108 |  |  |  |  |  |  | "Hemelvaartsdag"            => "+39", # Onze Lieve Heer Hemelvaart | 
| 1109 |  |  |  |  |  |  | "Pinksteren"                => "+49", | 
| 1110 |  |  |  |  |  |  | "Pinkstermaandag"           => "+50", | 
| 1111 |  |  |  |  |  |  | "Feest van de Vlaamse Gemeenschap" => "#11.07", | 
| 1112 |  |  |  |  |  |  | "Nationale feestdag"        => "21.07.", | 
| 1113 |  |  |  |  |  |  | "OLV Hemelvaart"            => "15.08.", # Onze Lieve Vrouw Hemelvaart | 
| 1114 |  |  |  |  |  |  | "Allerheiligen"             => "01.11.", | 
| 1115 |  |  |  |  |  |  | "Allerzielen"               => "#02.11.", | 
| 1116 |  |  |  |  |  |  | "Wapenstilstand 1918"       => "11.11.", | 
| 1117 |  |  |  |  |  |  | "Kerstmis"                  => "25.12.", | 
| 1118 |  |  |  |  |  |  | "Tweede kerstdag"           => "#26.12." | 
| 1119 |  |  |  |  |  |  | }; | 
| 1120 |  |  |  |  |  |  |  | 
| 1121 |  |  |  |  |  |  | # Thanks to: | 
| 1122 |  |  |  |  |  |  | # Stefaan Colson | 
| 1123 |  |  |  |  |  |  | # Stephane Rondal | 
| 1124 |  |  |  |  |  |  |  | 
| 1125 |  |  |  |  |  |  | $Profiles->{'BE-FR'} = # Belgique | 
| 1126 |  |  |  |  |  |  | { | 
| 1127 |  |  |  |  |  |  | "Nouvel An"                 => "01.01.", | 
| 1128 |  |  |  |  |  |  | "Épiphanie"                   => "#06.01.", | 
| 1129 |  |  |  |  |  |  | "Chandeleur"                => "#02.02.", | 
| 1130 |  |  |  |  |  |  | "Mardi-Gras"                => "#-47", | 
| 1131 |  |  |  |  |  |  | "Mercredi des Cendres"      => "#-46", | 
| 1132 |  |  |  |  |  |  | "Dimanche des Rameaux"      => "-7", | 
| 1133 |  |  |  |  |  |  | "Pâques"                    => "+0", | 
| 1134 |  |  |  |  |  |  | "Lundi de Pâques"           => "+1", | 
| 1135 |  |  |  |  |  |  | "Fête du Travail"           => "01.05.", | 
| 1136 |  |  |  |  |  |  | "Ascension"                 => "+39", | 
| 1137 |  |  |  |  |  |  | "Pentecôte"              => "+49", | 
| 1138 |  |  |  |  |  |  | "Lundi de Pentecôte"        => "+50", | 
| 1139 |  |  |  |  |  |  | "Fête Nationale"            => "21.07.", | 
| 1140 |  |  |  |  |  |  | "Assomption"                => "15.08.", | 
| 1141 |  |  |  |  |  |  | "Fête de la Communauté Française" => "#27.09.", | 
| 1142 |  |  |  |  |  |  | "Toussaint"                 => "01.11.", | 
| 1143 |  |  |  |  |  |  | "Jour des Défunts"          => "#02.11.", | 
| 1144 |  |  |  |  |  |  | "Armistice 1918"            => "11.11.", | 
| 1145 |  |  |  |  |  |  | "Noël"                      => "25.12.", | 
| 1146 |  |  |  |  |  |  | "2ième Jour de Noël"        => "#26.12.", | 
| 1147 |  |  |  |  |  |  | "Saint Sylvestre"           => "#31.12." | 
| 1148 |  |  |  |  |  |  | }; | 
| 1149 |  |  |  |  |  |  |  | 
| 1150 |  |  |  |  |  |  | $Profiles->{'LU-DE'} = # Großherzogtum Luxemburg | 
| 1151 |  |  |  |  |  |  | { | 
| 1152 |  |  |  |  |  |  | "Neujahr"                   => "01.01.", | 
| 1153 |  |  |  |  |  |  | "Fastnachtsmontag"          => "#-48", # regional unterschiedlich | 
| 1154 |  |  |  |  |  |  | "Ostersonntag"              => "+0", | 
| 1155 |  |  |  |  |  |  | "Ostermontag"               => "+1", | 
| 1156 |  |  |  |  |  |  | "Tag der Arbeit"            => "01.05.", | 
| 1157 |  |  |  |  |  |  | "Christi Himmelfahrt"       => "+39", | 
| 1158 |  |  |  |  |  |  | "Pfingstsonntag"            => "+49", | 
| 1159 |  |  |  |  |  |  | "Pfingstmontag"             => "+50", | 
| 1160 |  |  |  |  |  |  | "Nationalfeiertag"          => "23.06.", | 
| 1161 |  |  |  |  |  |  | "Mariä Himmelfahrt"         => "15.08.", | 
| 1162 |  |  |  |  |  |  | "Allerheiligen"             => "01.11.", | 
| 1163 |  |  |  |  |  |  | "Allerseelen"               => "#02.11.", # regional unterschiedlich | 
| 1164 |  |  |  |  |  |  | "Weihnachten"               => "25.12.", | 
| 1165 |  |  |  |  |  |  | "2. Weihnachtsfeiertag"     => "26.12." | 
| 1166 |  |  |  |  |  |  | }; | 
| 1167 |  |  |  |  |  |  | $Profiles->{'LU-FR'} = # Grand Duché du Luxembourg | 
| 1168 |  |  |  |  |  |  | { | 
| 1169 |  |  |  |  |  |  | "Nouvel An"                 => "01.01.", | 
| 1170 |  |  |  |  |  |  | "Veille du Mardi Gras"      => "#-48", # varie selon la région | 
| 1171 |  |  |  |  |  |  | "Pâques"                    => "+0", | 
| 1172 |  |  |  |  |  |  | "Lundi de Pâques"           => "+1", | 
| 1173 |  |  |  |  |  |  | "Fête du Travail"           => "01.05.", | 
| 1174 |  |  |  |  |  |  | "Ascension"                 => "+39", | 
| 1175 |  |  |  |  |  |  | "Pentecôte"                 => "+49", | 
| 1176 |  |  |  |  |  |  | "Lundi de Pentecôte"        => "+50", | 
| 1177 |  |  |  |  |  |  | "Jour National"             => "23.06.", | 
| 1178 |  |  |  |  |  |  | "Assomption"                => "15.08.", | 
| 1179 |  |  |  |  |  |  | "Toussaint"                 => "01.11.", | 
| 1180 |  |  |  |  |  |  | "Jour des Défunts"          => "#02.11.", # varie selon la région | 
| 1181 |  |  |  |  |  |  | "Noël"                      => "25.12.", | 
| 1182 |  |  |  |  |  |  | "2ième Jour de Noël"        => "#26.12.", | 
| 1183 |  |  |  |  |  |  | "Saint Sylvestre"           => "#31.12." | 
| 1184 |  |  |  |  |  |  | }; | 
| 1185 |  |  |  |  |  |  |  | 
| 1186 |  |  |  |  |  |  | $Profiles->{'PT'} = # Portugal | 
| 1187 |  |  |  |  |  |  | { | 
| 1188 |  |  |  |  |  |  | "Ano Novo"                  => "01.01.", | 
| 1189 |  |  |  |  |  |  | "Terça-Feira de Carnaval"   => "-47", | 
| 1190 |  |  |  |  |  |  | "Paixão de Cristo"          => "-2", | 
| 1191 |  |  |  |  |  |  | "Domingo de Páscoa"         => "+0", | 
| 1192 |  |  |  |  |  |  | "Dia da Liberdade"          => "25.04.", | 
| 1193 |  |  |  |  |  |  | "Dia do Trabalho"           => "01.05.", | 
| 1194 |  |  |  |  |  |  | "Ascensão de Cristo"        => "+39", | 
| 1195 |  |  |  |  |  |  | "Domingo de Pentecostes"    => "+49", | 
| 1196 |  |  |  |  |  |  | "Dia Nacional"              => "10.06.", | 
| 1197 |  |  |  |  |  |  | "Corpus Christi"            => "#+60", # varia segundo a região | 
| 1198 |  |  |  |  |  |  | "Assunção de Maria"         => "15.08.", | 
| 1199 |  |  |  |  |  |  | "Dia da República"          => "05.10.", | 
| 1200 |  |  |  |  |  |  | "Todos os Santos"           => "01.11.", | 
| 1201 |  |  |  |  |  |  | "Dia da Independência"      => "01.12.", | 
| 1202 |  |  |  |  |  |  | "Conceição de Maria"        => "08.12.", | 
| 1203 |  |  |  |  |  |  | "Natal"                     => "25.12." | 
| 1204 |  |  |  |  |  |  | }; | 
| 1205 |  |  |  |  |  |  |  | 
| 1206 |  |  |  |  |  |  | # Thanks to: | 
| 1207 |  |  |  |  |  |  | # Arturo Valdes | 
| 1208 |  |  |  |  |  |  |  | 
| 1209 |  |  |  |  |  |  | $Profiles->{'ES'} = # España | 
| 1210 |  |  |  |  |  |  | { | 
| 1211 |  |  |  |  |  |  | "Año Nuevo"                 => "01.01.", | 
| 1212 |  |  |  |  |  |  | "Epifanía del Señor"        => "06.01.", | 
| 1213 |  |  |  |  |  |  | "Día de Santo José"         => "#19.03.", | 
| 1214 |  |  |  |  |  |  | "Jueves Santo"              => "#-3", | 
| 1215 |  |  |  |  |  |  | "Viernes Santo"             => "-2", | 
| 1216 |  |  |  |  |  |  | "Domingo de Páscuas"        => "+0", | 
| 1217 |  |  |  |  |  |  | "Lunes de Páscuas"          => "#+1", # varía segundo la region | 
| 1218 |  |  |  |  |  |  | "Día del Trabajo"           => "01.05.", | 
| 1219 |  |  |  |  |  |  | "Domingo de Pentecostes"    => "+49", | 
| 1220 |  |  |  |  |  |  | "Santiago Apóstol"          => "#25.07.", | 
| 1221 |  |  |  |  |  |  | "Ascensión de la Virgen"    => "15.08.", # Ascensión de María | 
| 1222 |  |  |  |  |  |  | "Fiesta Nacional de España" => "12.10.", | 
| 1223 |  |  |  |  |  |  | "Todos los Santos"          => "01.11.", | 
| 1224 |  |  |  |  |  |  | "Día de la Constitución"    => "06.12.", | 
| 1225 |  |  |  |  |  |  | "Inmaculada Concepción"     => "08.12.", # Día de la Concepción | 
| 1226 |  |  |  |  |  |  | "Natividad del Señor"       => "25.12." | 
| 1227 |  |  |  |  |  |  | }; | 
| 1228 |  |  |  |  |  |  |  | 
| 1229 |  |  |  |  |  |  | # Thanks to: | 
| 1230 |  |  |  |  |  |  | # Michele Beltrame | 
| 1231 |  |  |  |  |  |  | # Aldo Calpini | 
| 1232 |  |  |  |  |  |  | # Alessio Bragadini | 
| 1233 |  |  |  |  |  |  |  | 
| 1234 |  |  |  |  |  |  | $Profiles->{'IT'} = # Italia | 
| 1235 |  |  |  |  |  |  | { | 
| 1236 |  |  |  |  |  |  | "Capodanno"                 => "01.01.", | 
| 1237 |  |  |  |  |  |  | "Epifania"                  => "06.01.", | 
| 1238 |  |  |  |  |  |  | "San Valentino"             => "#14.02.", | 
| 1239 |  |  |  |  |  |  | "Festa della Donna"         => "#08.03.", | 
| 1240 |  |  |  |  |  |  | "Festa della Mamma"         => "1/Sun/May", | 
| 1241 |  |  |  |  |  |  | "Martedì Grasso"            => "#-47", | 
| 1242 |  |  |  |  |  |  | "Pasqua"                    => "+0", | 
| 1243 |  |  |  |  |  |  | "Lunedì dell'Angelo"        => "+1", | 
| 1244 |  |  |  |  |  |  | "Liberazione d'Italia 1945" => "25.04.", | 
| 1245 |  |  |  |  |  |  | "Festa del Lavoro"          => "01.05.", | 
| 1246 |  |  |  |  |  |  | "Fondazione della Repubblica 1946" => \&IT_Fondazione, | 
| 1247 |  |  |  |  |  |  | "Pentecoste"                => "+49", | 
| 1248 |  |  |  |  |  |  | "Ferragosto"                => "15.08.", | 
| 1249 |  |  |  |  |  |  | "Tutti i Santi"             => "01.11.", | 
| 1250 |  |  |  |  |  |  | "Celebrazione dei Defunti"  => "#02.11.", | 
| 1251 |  |  |  |  |  |  | "Giorno dell'Unità Nazionale" => "#04.11.", | 
| 1252 |  |  |  |  |  |  | "Fine della 1a Guerra Mondiale" => "#04.11.", | 
| 1253 |  |  |  |  |  |  | "Giorno delle Forze Armate" => "#04.11.", | 
| 1254 |  |  |  |  |  |  | "Immacolata Concezione"     => "08.12.", | 
| 1255 |  |  |  |  |  |  | "Natale"                    => "25.12.", | 
| 1256 |  |  |  |  |  |  | "S. Stefano"                => "26.12." | 
| 1257 |  |  |  |  |  |  | }; | 
| 1258 |  |  |  |  |  |  |  | 
| 1259 |  |  |  |  |  |  | # Fixed thanks to: | 
| 1260 |  |  |  |  |  |  | # Michele Valzelli | 
| 1261 |  |  |  |  |  |  |  | 
| 1262 |  |  |  |  |  |  | sub IT_Fondazione | 
| 1263 |  |  |  |  |  |  | { | 
| 1264 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1265 |  |  |  |  |  |  |  | 
| 1266 | 1 | 50 |  |  |  | 4 | if ($year >= 1947) | 
| 1267 |  |  |  |  |  |  | { | 
| 1268 | 1 | 50 | 33 |  |  | 6 | if (($year <= 1977) or ($year >= 2000)) { return($year,6,2);     } | 
|  | 1 |  |  |  |  | 4 |  | 
| 1269 | 0 |  |  |  |  | 0 | else                                    { return($year,6,2,'#'); } # only commemorative | 
| 1270 |  |  |  |  |  |  | } | 
| 1271 | 0 |  |  |  |  | 0 | return(); # didn't exist before 1947 | 
| 1272 |  |  |  |  |  |  | } | 
| 1273 |  |  |  |  |  |  |  | 
| 1274 |  |  |  |  |  |  | # Thanks to: | 
| 1275 |  |  |  |  |  |  | # Georg Mavridis | 
| 1276 |  |  |  |  |  |  |  | 
| 1277 |  |  |  |  |  |  | $Profiles->{'GR'} = # Greece | 
| 1278 |  |  |  |  |  |  | { | 
| 1279 |  |  |  |  |  |  | "Prwtohronia"                 => "01.01.",  # New Year | 
| 1280 |  |  |  |  |  |  | "Theofaneia"                  => "06.01.",  # Epifania | 
| 1281 |  |  |  |  |  |  | "Katharh devtera"             => "-48",     # Carnival Monday | 
| 1282 |  |  |  |  |  |  | #   "???"                         => "???",     # Annunciation of Maria | 
| 1283 |  |  |  |  |  |  | "Ethniki giorth 1"            => "25.03.",  # National Day #1 | 
| 1284 |  |  |  |  |  |  | "Megalh paraskevh"            => "-2",      # Good Friday | 
| 1285 |  |  |  |  |  |  | "Kyriakh toy pasha"           => "+0",      # Easter Sunday | 
| 1286 |  |  |  |  |  |  | "Devtera toy pasha"           => "+1",      # Easter Monday | 
| 1287 |  |  |  |  |  |  | "Analypsews"                  => "#+39",    # Ascension of Christ | 
| 1288 |  |  |  |  |  |  | "Kyriakh toy agiou pnevmatos" => "+49",     # Whitsunday | 
| 1289 |  |  |  |  |  |  | "Agiou pnevmatos"             => "+50",     # Whitmonday | 
| 1290 |  |  |  |  |  |  | "Hmera ths ergasias"          => "01.05.",  # Labour Day (also commonly called "Prwtomagia") | 
| 1291 |  |  |  |  |  |  | "Koimhsews theotokoy"         => "15.08.",  # Ascension of Maria | 
| 1292 |  |  |  |  |  |  | "Timioy stavrou"              => "#14.09.", # Feast of the Elevation of the Cross | 
| 1293 |  |  |  |  |  |  | "Ethniki giorth 2"            => "28.10.",  # National Day #2 | 
| 1294 |  |  |  |  |  |  | "Hristougenna"                => "25.12.",  # Christmas (1st Day) | 
| 1295 |  |  |  |  |  |  | "Devterh mera hristougennwn"  => "26.12.",  # Christmas (2nd Day) | 
| 1296 |  |  |  |  |  |  | }; | 
| 1297 |  |  |  |  |  |  |  | 
| 1298 |  |  |  |  |  |  | # Thanks to: | 
| 1299 |  |  |  |  |  |  | # Flemming Mahler Larsen | 
| 1300 |  |  |  |  |  |  |  | 
| 1301 |  |  |  |  |  |  | $Profiles->{'DK'} = # Denmark | 
| 1302 |  |  |  |  |  |  | { | 
| 1303 |  |  |  |  |  |  | "Nytårsdag"              => "01.01.", | 
| 1304 |  |  |  |  |  |  | "Hellig tre Konger"         => "1/Sun/Jan", # (H3K) - First Sunday of the year | 
| 1305 |  |  |  |  |  |  | "Fastelavn"                 => "-49", # 7th Sunday before Easter | 
| 1306 |  |  |  |  |  |  | "Palme søndag"           => "-7", # Sunday before Easter | 
| 1307 |  |  |  |  |  |  | "Skærtorsdag"            => "-3", | 
| 1308 |  |  |  |  |  |  | "Langfredag"                => "-2", | 
| 1309 |  |  |  |  |  |  | "Påskedag"               => "+0", | 
| 1310 |  |  |  |  |  |  | "2. Påskedag"            => "+1", | 
| 1311 |  |  |  |  |  |  | "Store bededag"             => "+26", # 4th Friday after Easter | 
| 1312 |  |  |  |  |  |  | "Grundlovsdag"              => "05.06.", | 
| 1313 |  |  |  |  |  |  | "Skt. Hans aften"           => "23.06.", | 
| 1314 |  |  |  |  |  |  | "Kristi himmelfart"         => "+39", | 
| 1315 |  |  |  |  |  |  | "Pinsedag"                  => "+49", | 
| 1316 |  |  |  |  |  |  | "2. Pinsedag"               => "+50", | 
| 1317 |  |  |  |  |  |  | "Mortensdag"                => "11.10.", | 
| 1318 |  |  |  |  |  |  | "Allehelgen"                => "1/Sun/Nov", # Halloween | 
| 1319 |  |  |  |  |  |  | "1. Advent"                 => \&Advent, | 
| 1320 |  |  |  |  |  |  | "2. Advent"                 => \&Advent, | 
| 1321 |  |  |  |  |  |  | "3. Advent"                 => \&Advent, | 
| 1322 |  |  |  |  |  |  | "4. Advent"                 => \&Advent, | 
| 1323 |  |  |  |  |  |  | "Juleaftensdag"             => "24.12.", | 
| 1324 |  |  |  |  |  |  | "1. Juledag"                => "25.12.", | 
| 1325 |  |  |  |  |  |  | "2. Juledag"                => "26.12." | 
| 1326 |  |  |  |  |  |  | }; | 
| 1327 |  |  |  |  |  |  |  | 
| 1328 |  |  |  |  |  |  | # Thanks to: | 
| 1329 |  |  |  |  |  |  | # H. Merijn Brand | 
| 1330 |  |  |  |  |  |  | # Johan Vromans | 
| 1331 |  |  |  |  |  |  | # Abigail | 
| 1332 |  |  |  |  |  |  | # Elizabeth Mattijsen | 
| 1333 |  |  |  |  |  |  | # Abe Timmerman | 
| 1334 |  |  |  |  |  |  | # Jigal van Hemert | 
| 1335 |  |  |  |  |  |  | # Wim Verhaegen | 
| 1336 |  |  |  |  |  |  | # Cas Tuyn | 
| 1337 |  |  |  |  |  |  | # Remco B. Brink | 
| 1338 |  |  |  |  |  |  | # Can Bican | 
| 1339 |  |  |  |  |  |  | # Ziya Suzen | 
| 1340 |  |  |  |  |  |  | # Henk Uijterwaal | 
| 1341 |  |  |  |  |  |  | # Eric Veldhuyzen | 
| 1342 |  |  |  |  |  |  |  | 
| 1343 |  |  |  |  |  |  | $Profiles->{'NL'} = # Nederland | 
| 1344 |  |  |  |  |  |  | { | 
| 1345 |  |  |  |  |  |  | "Nieuwjaar"                 => "01-01", | 
| 1346 |  |  |  |  |  |  | "Driekoningen"              => "#06-01", | 
| 1347 |  |  |  |  |  |  | "Valentijnsdag"             => "#14-02", | 
| 1348 |  |  |  |  |  |  | "Biddag voor het gewas"     => "#2/Wed/Mar", | 
| 1349 |  |  |  |  |  |  | "Carnaval"                  => "#-48", | 
| 1350 |  |  |  |  |  |  | "Vastenavond"               => "#-47", | 
| 1351 |  |  |  |  |  |  | "Aswoensdag"                => "#-46", | 
| 1352 |  |  |  |  |  |  | "Een April"                 => "#01-04", | 
| 1353 |  |  |  |  |  |  | "Palmpasen"                 => "-7", | 
| 1354 |  |  |  |  |  |  | "Witte Donderdag"           => "#-3", | 
| 1355 |  |  |  |  |  |  | "Goede Vrijdag"             => "#-2", | 
| 1356 |  |  |  |  |  |  | "Stille Zaterdag"           => "#-1", | 
| 1357 |  |  |  |  |  |  | "Pasen"                     => "+0", | 
| 1358 |  |  |  |  |  |  | "Paasmaandag"               => "+1", | 
| 1359 |  |  |  |  |  |  | "Moederdag"                 => "2/Sun/May", | 
| 1360 |  |  |  |  |  |  | "Vaderdag"                  => "3/Sun/Jun", | 
| 1361 |  |  |  |  |  |  | "Koninginnedag"             => \&NL_Koninginnedag, | 
| 1362 |  |  |  |  |  |  | "Dodenherdenking"           => "#04-05", | 
| 1363 |  |  |  |  |  |  | "Bevrijdingsdag"            => \&NL_Bevrijdingsdag, | 
| 1364 |  |  |  |  |  |  | "Hemelvaart"                => "+39", | 
| 1365 |  |  |  |  |  |  | "Pinksteren"                => "+49", | 
| 1366 |  |  |  |  |  |  | "Pinkstermaandag"           => "+50", | 
| 1367 |  |  |  |  |  |  | "Trinitatis"                => "+56", | 
| 1368 |  |  |  |  |  |  | "Prinsjesdag"               => "#3/Tue/Sep", | 
| 1369 |  |  |  |  |  |  | "Dierendag"                 => "#04-10", | 
| 1370 |  |  |  |  |  |  | "Dankdag voor het gewas"    => "#1/Wed/Nov", | 
| 1371 |  |  |  |  |  |  | "Sint Maarten"              => "#11-11", | 
| 1372 |  |  |  |  |  |  | "Sinterklaasavond"          => "#05-12", | 
| 1373 |  |  |  |  |  |  | "Sinterklaas"               => "#06-12", | 
| 1374 |  |  |  |  |  |  | "Koninkrijksdag"            => "#15-12", | 
| 1375 |  |  |  |  |  |  | "Kerstmis"                  => "25-12", | 
| 1376 |  |  |  |  |  |  | "2e Kerstdag"               => "26-12" | 
| 1377 |  |  |  |  |  |  | }; | 
| 1378 |  |  |  |  |  |  |  | 
| 1379 |  |  |  |  |  |  | sub NL_Koninginnedag | 
| 1380 |  |  |  |  |  |  | { | 
| 1381 | 1 |  |  | 1 | 0 | 3 | my($year,$label) = @_; | 
| 1382 | 1 |  |  |  |  | 1 | my(@date); | 
| 1383 |  |  |  |  |  |  |  | 
| 1384 | 1 |  |  |  |  | 4 | @date = ($year,4,30); | 
| 1385 | 1 | 50 |  |  |  | 3 | if (Day_of_Week(@date) == 7) { @date = Add_Delta_Days(@date,-1); } | 
|  | 1 |  |  |  |  | 4 |  | 
| 1386 | 1 |  |  |  |  | 5 | return(@date); | 
| 1387 |  |  |  |  |  |  | } | 
| 1388 |  |  |  |  |  |  |  | 
| 1389 |  |  |  |  |  |  | # Bevrijdingsdag: | 
| 1390 |  |  |  |  |  |  | # | 
| 1391 |  |  |  |  |  |  | # 1945     : Liberation from German occupation in World War II | 
| 1392 |  |  |  |  |  |  | # 1946,1947: Official holiday | 
| 1393 |  |  |  |  |  |  | # 1948,1949: Afternoon off for government personnel, some local celebrations | 
| 1394 |  |  |  |  |  |  | # 1950-1957: No official celebrations | 
| 1395 |  |  |  |  |  |  | # 1958-1981: Commemorative, holiday for government personnel, schools etc. | 
| 1396 |  |  |  |  |  |  | # 1982-1990: Official holiday for everybody | 
| 1397 |  |  |  |  |  |  | # 1990-... : Official holiday every 5th year for everybody | 
| 1398 |  |  |  |  |  |  | # | 
| 1399 |  |  |  |  |  |  | # See also | 
| 1400 |  |  |  |  |  |  | # http://www.herdenkenenvieren.nl/utility/print.jsp?detail=2197&contentid=2197&siteid=hev&nofooter=true | 
| 1401 |  |  |  |  |  |  |  | 
| 1402 |  |  |  |  |  |  | # As far as I know, 'bevrijdingsdag' is an official national celebration | 
| 1403 |  |  |  |  |  |  | # day for everybody, but this does NOT mean that you do not have to go to | 
| 1404 |  |  |  |  |  |  | # work. This depends on your employer. In general, for everybody it is | 
| 1405 |  |  |  |  |  |  | # just a normal work day, except for people working for the government. | 
| 1406 |  |  |  |  |  |  | # | 
| 1407 |  |  |  |  |  |  | # See also | 
| 1408 |  |  |  |  |  |  | # http://home.szw.nl/faq/dsp_faq.cfm?view=3Ddetail&link_id=3D41264 | 
| 1409 |  |  |  |  |  |  | # http://www.abvakabo.net/faq/index.php?page=3Dindex_v2&id=3D333&c=3D91 | 
| 1410 |  |  |  |  |  |  |  | 
| 1411 |  |  |  |  |  |  | sub NL_Bevrijdingsdag | 
| 1412 |  |  |  |  |  |  | { | 
| 1413 | 1 |  |  | 1 | 0 | 3 | my($year,$label) = @_; | 
| 1414 |  |  |  |  |  |  |  | 
| 1415 | 1 | 50 |  |  |  | 4 | if ($year >= 1945) | 
| 1416 |  |  |  |  |  |  | { | 
| 1417 | 1 | 50 | 33 |  |  | 23 | if (                     ($year <= 1947)  or | 
|  |  | 0 | 33 |  |  |  |  | 
|  |  |  | 33 |  |  |  |  | 
|  |  |  | 33 |  |  |  |  | 
|  |  |  | 0 |  |  |  |  | 
| 1418 |  |  |  |  |  |  | (($year >= 1982) and ($year <= 1990)) or | 
| 1419 |  |  |  |  |  |  | (($year >  1990) and (($year % 5) == 0))) | 
| 1420 |  |  |  |  |  |  | { | 
| 1421 | 1 |  |  |  |  | 4 | return($year,5,5);     # true holiday | 
| 1422 |  |  |  |  |  |  | } | 
| 1423 |  |  |  |  |  |  | elsif (($year == 1948) or ($year == 1949)) | 
| 1424 |  |  |  |  |  |  | { | 
| 1425 | 0 |  |  |  |  | 0 | return($year,5,5,':'); # half day off | 
| 1426 |  |  |  |  |  |  | } | 
| 1427 |  |  |  |  |  |  | else | 
| 1428 |  |  |  |  |  |  | { | 
| 1429 | 0 |  |  |  |  | 0 | return($year,5,5,'#'); # only commemorative | 
| 1430 |  |  |  |  |  |  | } | 
| 1431 |  |  |  |  |  |  | } | 
| 1432 | 0 |  |  |  |  | 0 | return(); # didn't exist before 1945 | 
| 1433 |  |  |  |  |  |  | } | 
| 1434 |  |  |  |  |  |  |  | 
| 1435 |  |  |  |  |  |  | # Thanks to: | 
| 1436 |  |  |  |  |  |  | # Erland Sommarskog | 
| 1437 |  |  |  |  |  |  | # Magnus Bodin | 
| 1438 |  |  |  |  |  |  | # Olle E. Johansson | 
| 1439 |  |  |  |  |  |  |  | 
| 1440 |  |  |  |  |  |  | $Profiles->{'SV'} = # Sverige | 
| 1441 |  |  |  |  |  |  | { | 
| 1442 |  |  |  |  |  |  | "Nyårsdagen"                => "01.01.", | 
| 1443 |  |  |  |  |  |  | "Trettondedagsafton"        => "#05.01.", # 12 days after Dec 24th | 
| 1444 |  |  |  |  |  |  | "Trettondedag jul"          => "06.01.",  # 13 days after Dec 24th | 
| 1445 |  |  |  |  |  |  | "Tjugondedag Knut"          => "#13.01.", # 20 days after Dec 24th according to Olle E. Johansson | 
| 1446 |  |  |  |  |  |  | "Kyndelsmässodagen"         => "#02.02", | 
| 1447 |  |  |  |  |  |  | "Marie bebådelsedag"        => "#25.03", | 
| 1448 |  |  |  |  |  |  | "Skärtorsdag"               => "#-3", | 
| 1449 |  |  |  |  |  |  | "Långfredagen"              => "-2", | 
| 1450 |  |  |  |  |  |  | "Påskafton"                 => "#-1", # like a Saturday | 
| 1451 |  |  |  |  |  |  | "Påskdagen"                 => "+0", | 
| 1452 |  |  |  |  |  |  | "Annandag påsk"             => "+1", | 
| 1453 |  |  |  |  |  |  | "Valborgsmässoafton"        => "#30.04.", | 
| 1454 |  |  |  |  |  |  | "Första maj"                => "01.05.", | 
| 1455 |  |  |  |  |  |  | "Syttende maj"              => "#17.05.", # not a swedish but a norwegian holiday according to Olle E. Johansson | 
| 1456 |  |  |  |  |  |  | "Mors dag"                  => "5/Sun/May", # Last Sun in May | 
| 1457 |  |  |  |  |  |  | "Fars dag"                  => "2/Sun/Nov", # 2nd  Sun in Nov | 
| 1458 |  |  |  |  |  |  | "Sveriges nationaldag"      => "#06.06.", | 
| 1459 |  |  |  |  |  |  | "Johannes Döparens dag"     => "#24.06.", | 
| 1460 |  |  |  |  |  |  | "Kristi himmelsfärds dag"   => "+39", | 
| 1461 |  |  |  |  |  |  | "Pingstafton"               => "#+48", # like a Saturday | 
| 1462 |  |  |  |  |  |  | "Pingstdagen"               => "+49", | 
| 1463 |  |  |  |  |  |  | "Annandag pingst"           => "+50", | 
| 1464 |  |  |  |  |  |  | "Midsommarafton"            => \&SV_Midsommarafton, # like a Saturday | 
| 1465 |  |  |  |  |  |  | "Midsommardagen"            => \&SV_Midsommardagen, | 
| 1466 |  |  |  |  |  |  | "Alla helgons dag"          => \&SV_Alla_Helgons_Dag, | 
| 1467 |  |  |  |  |  |  | "Allhelgonadagen"           => "#01.11.", | 
| 1468 |  |  |  |  |  |  | "FN-dagen"                  => "#24.10.", | 
| 1469 |  |  |  |  |  |  | "Gustav Adolfs-dagen"       => "#06.11.", | 
| 1470 |  |  |  |  |  |  | "Nobeldagen"                => "#10.12.", | 
| 1471 |  |  |  |  |  |  | "Julafton"                  => "#24.12.", # like a Saturday | 
| 1472 |  |  |  |  |  |  | "Juldagen"                  => "25.12.", | 
| 1473 |  |  |  |  |  |  | "Annandag jul"              => "26.12.", | 
| 1474 |  |  |  |  |  |  | "Nyårsafton"                => "#31.12." # like a Saturday | 
| 1475 |  |  |  |  |  |  | }; | 
| 1476 |  |  |  |  |  |  |  | 
| 1477 |  |  |  |  |  |  | sub SV_Midsommarafton # Friday that falls on June 19th to 25th | 
| 1478 |  |  |  |  |  |  | { | 
| 1479 | 1 |  |  | 1 | 0 | 3 | my($year,$label) = @_; | 
| 1480 | 1 |  |  |  |  | 5 | return( Add_Delta_Days($year,6,28, | 
| 1481 |  |  |  |  |  |  | -(Day_of_Week($year,6,28)+2)), '#' ); | 
| 1482 |  |  |  |  |  |  | } | 
| 1483 |  |  |  |  |  |  | sub SV_Midsommardagen # Saturday that falls on June 20th to 26th | 
| 1484 |  |  |  |  |  |  | { | 
| 1485 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1486 | 1 |  |  |  |  | 5 | return( Add_Delta_Days($year,6,28, | 
| 1487 |  |  |  |  |  |  | -(Day_of_Week($year,6,28)+1)) ); | 
| 1488 |  |  |  |  |  |  | } | 
| 1489 |  |  |  |  |  |  | sub SV_Alla_Helgons_Dag # Saturday that falls on Oct 31st to Nov 6th | 
| 1490 |  |  |  |  |  |  | { | 
| 1491 | 1 |  |  | 1 | 0 | 3 | my($year,$label) = @_; | 
| 1492 | 1 |  |  |  |  | 5 | return( Add_Delta_Days($year,11,8, | 
| 1493 |  |  |  |  |  |  | -(Day_of_Week($year,11,8)+1)) ); | 
| 1494 |  |  |  |  |  |  | } | 
| 1495 |  |  |  |  |  |  |  | 
| 1496 |  |  |  |  |  |  | # Thanks to: | 
| 1497 |  |  |  |  |  |  | # Gisle Aas | 
| 1498 |  |  |  |  |  |  | # Remco B. Brink | 
| 1499 |  |  |  |  |  |  | # Lars Ole | 
| 1500 |  |  |  |  |  |  | # Vetle Roeim | 
| 1501 |  |  |  |  |  |  |  | 
| 1502 |  |  |  |  |  |  | $Profiles->{'NO'} = # Norway | 
| 1503 |  |  |  |  |  |  | { | 
| 1504 |  |  |  |  |  |  | "Nyttårsdag"              => "01/01", | 
| 1505 |  |  |  |  |  |  | "Onsdag før Skjærtorsdag" => "#-4", # sometimes half a day off | 
| 1506 |  |  |  |  |  |  | "Skjærtorsdag"            => "-3", | 
| 1507 |  |  |  |  |  |  | "Langfredag"              => "-2", | 
| 1508 |  |  |  |  |  |  | "Påskedag"                => "+0", | 
| 1509 |  |  |  |  |  |  | "2. Påskedag"             => "+1", | 
| 1510 |  |  |  |  |  |  | "1. mai"                  => "05/01", | 
| 1511 |  |  |  |  |  |  | "Grunnlovsdag"            => "05/17", | 
| 1512 |  |  |  |  |  |  | "Kristi himmelfartsdag"   => "+39", | 
| 1513 |  |  |  |  |  |  | "Pinsedag"                => "+49", | 
| 1514 |  |  |  |  |  |  | "2. Pinsedag"             => "+50", | 
| 1515 |  |  |  |  |  |  | "Julaften"                => "#12/24", # sometimes half a day off | 
| 1516 |  |  |  |  |  |  | "Juledag"                 => "12/25", | 
| 1517 |  |  |  |  |  |  | "2. Juledag"              => "12/26", | 
| 1518 |  |  |  |  |  |  | "Nyttårsaften"            => "#31.12" # sometimes half a day off | 
| 1519 |  |  |  |  |  |  | }; | 
| 1520 |  |  |  |  |  |  |  | 
| 1521 |  |  |  |  |  |  | ## Thanks to: | 
| 1522 |  |  |  |  |  |  | ## Sercan Uslu | 
| 1523 |  |  |  |  |  |  | # | 
| 1524 |  |  |  |  |  |  | #$Profiles->{'TR'} = # Türkiye | 
| 1525 |  |  |  |  |  |  | #{ | 
| 1526 |  |  |  |  |  |  | ## National Public Holidays (fixed): | 
| 1527 |  |  |  |  |  |  | # | 
| 1528 |  |  |  |  |  |  | #    "New Year's Day"                         => "01-01", | 
| 1529 |  |  |  |  |  |  | #    "National Sovereignty Day"               => "23-04", | 
| 1530 |  |  |  |  |  |  | #    "Children's Day"                         => "23-04", | 
| 1531 |  |  |  |  |  |  | #    "Atatürk Commemoration"                  => "19-05", | 
| 1532 |  |  |  |  |  |  | #    "Youth and Sports Day"                   => "19-05", | 
| 1533 |  |  |  |  |  |  | #    "Victory Day"                            => "30-08", | 
| 1534 |  |  |  |  |  |  | #    "Republic Day"                           => "29-10", | 
| 1535 |  |  |  |  |  |  | # | 
| 1536 |  |  |  |  |  |  | ## Religious Public Holidays (moving): | 
| 1537 |  |  |  |  |  |  | # | 
| 1538 |  |  |  |  |  |  | #    "Kurban Bayram (Eid al Adha) 1"          => "22-02", # only valid in 2002 | 
| 1539 |  |  |  |  |  |  | #    "Kurban Bayram (Eid al Adha) 2"          => "23-02", # only valid in 2002 | 
| 1540 |  |  |  |  |  |  | #    "Kurban Bayram (Eid al Adha) 3"          => "24-02", # only valid in 2002 | 
| 1541 |  |  |  |  |  |  | #    "Kurban Bayram (Eid al Adha) 4"          => "25-02", # only valid in 2002 | 
| 1542 |  |  |  |  |  |  | # | 
| 1543 |  |  |  |  |  |  | #    "Ramazan / Seker Bayram (Eid al Fitr) 1" => "05-12", # only valid in 2002 | 
| 1544 |  |  |  |  |  |  | #    "Ramazan / Seker Bayram (Eid al Fitr) 2" => "06-12", # only valid in 2002 | 
| 1545 |  |  |  |  |  |  | #    "Ramazan / Seker Bayram (Eid al Fitr) 3" => "07-12"  # only valid in 2002 | 
| 1546 |  |  |  |  |  |  | #}; | 
| 1547 |  |  |  |  |  |  |  | 
| 1548 |  |  |  |  |  |  | # Thanks to: | 
| 1549 |  |  |  |  |  |  | # Jonathan Stowe | 
| 1550 |  |  |  |  |  |  |  | 
| 1551 |  |  |  |  |  |  | $Profiles->{'GB'} = # Great Britain | 
| 1552 |  |  |  |  |  |  | { | 
| 1553 |  |  |  |  |  |  | "New Year's Day"            => \&GB_New_Year, | 
| 1554 |  |  |  |  |  |  | "Good Friday"               => "-2", | 
| 1555 |  |  |  |  |  |  | "Easter Sunday"             => "+0", | 
| 1556 |  |  |  |  |  |  | "Easter Monday"             => "+1", | 
| 1557 |  |  |  |  |  |  | "Early May Bank Holiday"    => \&GB_Early_May, | 
| 1558 |  |  |  |  |  |  | "Late May Bank Holiday"     => "5/Mon/May", # Last Monday | 
| 1559 |  |  |  |  |  |  | # | 
| 1560 |  |  |  |  |  |  | # Jonathan Stowe  told me that spring | 
| 1561 |  |  |  |  |  |  | # bank holiday is the first Monday after Whitsun, but my pocket | 
| 1562 |  |  |  |  |  |  | # calendar suggests otherwise. I decided to follow my pocket | 
| 1563 |  |  |  |  |  |  | # guide and an educated guess ;-), but please correct me if | 
| 1564 |  |  |  |  |  |  | # I'm wrong! | 
| 1565 |  |  |  |  |  |  | # | 
| 1566 |  |  |  |  |  |  | "Summer Bank Holiday"       => "5/Mon/Aug", # Last Monday | 
| 1567 |  |  |  |  |  |  | "Christmas Day"             => \&GB_Christmas, | 
| 1568 |  |  |  |  |  |  | "Boxing Day"                => \&GB_Boxing | 
| 1569 |  |  |  |  |  |  | }; | 
| 1570 |  |  |  |  |  |  |  | 
| 1571 |  |  |  |  |  |  | sub GB_New_Year | 
| 1572 |  |  |  |  |  |  | { | 
| 1573 | 1 |  |  | 1 | 0 | 3 | my($year,$label) = @_; | 
| 1574 | 1 |  |  |  |  | 3 | return( &Next_Monday($year,1,1) ); | 
| 1575 |  |  |  |  |  |  | } | 
| 1576 |  |  |  |  |  |  | # | 
| 1577 |  |  |  |  |  |  | # The following formula (also from Jonathan Stowe ) | 
| 1578 |  |  |  |  |  |  | # also contradicts my pocket calendar, but for lack of a better guess I | 
| 1579 |  |  |  |  |  |  | # left it as it is. Please tell me the correct formula in case this one | 
| 1580 |  |  |  |  |  |  | # is wrong! Thank you! | 
| 1581 |  |  |  |  |  |  | # | 
| 1582 |  |  |  |  |  |  | sub GB_Early_May # May bank holiday is the first Monday after May 1st | 
| 1583 |  |  |  |  |  |  | { | 
| 1584 | 1 |  |  | 1 | 0 | 3 | my($year,$label) = @_; | 
| 1585 | 1 | 50 |  |  |  | 4 | if (Day_of_Week($year,5,1) == 1) | 
| 1586 | 1 |  |  |  |  | 3 | { return( Nth_Weekday_of_Month_Year($year,5,1,2) ); } | 
| 1587 |  |  |  |  |  |  | else | 
| 1588 | 0 |  |  |  |  | 0 | { return( Nth_Weekday_of_Month_Year($year,5,1,1) ); } | 
| 1589 |  |  |  |  |  |  | } | 
| 1590 |  |  |  |  |  |  | sub GB_Christmas | 
| 1591 |  |  |  |  |  |  | { | 
| 1592 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1593 | 1 |  |  |  |  | 3 | return( &Next_Monday($year,12,25) ); | 
| 1594 |  |  |  |  |  |  | } | 
| 1595 |  |  |  |  |  |  | sub GB_Boxing | 
| 1596 |  |  |  |  |  |  | { | 
| 1597 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1598 | 1 |  |  |  |  | 4 | return( &Next_Monday_or_Tuesday($year,12,26) ); | 
| 1599 |  |  |  |  |  |  | } | 
| 1600 |  |  |  |  |  |  |  | 
| 1601 |  |  |  |  |  |  | # Thanks to: | 
| 1602 |  |  |  |  |  |  | # Bianca Taylor | 
| 1603 |  |  |  |  |  |  | # Andie Posey | 
| 1604 |  |  |  |  |  |  | # Don Simonetta | 
| 1605 |  |  |  |  |  |  | # Paul Fenwick | 
| 1606 |  |  |  |  |  |  | # Brian Graham | 
| 1607 |  |  |  |  |  |  | # Pat Waters | 
| 1608 |  |  |  |  |  |  | # Stephen Riehm | 
| 1609 |  |  |  |  |  |  | #     http://www.holidayfestival.com/Australia.html | 
| 1610 |  |  |  |  |  |  | #     http://www.earthcalendar.net/countries/2001/australia.html | 
| 1611 |  |  |  |  |  |  | # Sven Geisler | 
| 1612 |  |  |  |  |  |  | # Canberra (ACT): | 
| 1613 |  |  |  |  |  |  | #     http://www.workcover.act.gov.au/labourreg/publicholidays.html | 
| 1614 |  |  |  |  |  |  | # New South Wales (NSW): | 
| 1615 |  |  |  |  |  |  | #     http://www.dir.nsw.gov.au/holidays/index.html | 
| 1616 |  |  |  |  |  |  | # Northern Territory (NT): | 
| 1617 |  |  |  |  |  |  | #     http://www.nt.gov.au/ocpe/documents/public-holidays/ | 
| 1618 |  |  |  |  |  |  | # Queensland (QLD): | 
| 1619 |  |  |  |  |  |  | #     http://www.wageline.qld.gov.au/publicholidays/list_pubhols.html | 
| 1620 |  |  |  |  |  |  | # South Australia (SA): | 
| 1621 |  |  |  |  |  |  | #     http://www.sacentral.sa.gov.au/information/pubhols.htm | 
| 1622 |  |  |  |  |  |  | # Tasmania (TAS): | 
| 1623 |  |  |  |  |  |  | #     http://www.workcover.tas.gov.au/WSTPublish/node/wststatutory.htm | 
| 1624 |  |  |  |  |  |  | # Victoria (VIC): | 
| 1625 |  |  |  |  |  |  | #     http://www.info.vic.gov.au/resources/publichols.htm | 
| 1626 |  |  |  |  |  |  | # Western Australia (WA): | 
| 1627 |  |  |  |  |  |  | #     http://www.doplar.wa.gov.au/wages/pub_hol1.htm | 
| 1628 |  |  |  |  |  |  |  | 
| 1629 |  |  |  |  |  |  | $Profiles->{'AU'} = # Australia | 
| 1630 |  |  |  |  |  |  | { | 
| 1631 |  |  |  |  |  |  | "Australia Day"             => \&AU_Australia, | 
| 1632 |  |  |  |  |  |  | "St. Valentine's Day"       => "#14.02.", | 
| 1633 |  |  |  |  |  |  | "Good Friday"               => "-2", | 
| 1634 |  |  |  |  |  |  | "Easter Sunday"             => "+0", | 
| 1635 |  |  |  |  |  |  | "Easter Monday"             => "+1", | 
| 1636 |  |  |  |  |  |  | "Anzac Day"                 => "25.04.", | 
| 1637 |  |  |  |  |  |  | "Christmas Day"             => \&AU_Christmas, | 
| 1638 |  |  |  |  |  |  | "Boxing Day"                => \&AU_Boxing | 
| 1639 |  |  |  |  |  |  | }; | 
| 1640 |  |  |  |  |  |  |  | 
| 1641 |  |  |  |  |  |  | sub AU_Australia | 
| 1642 |  |  |  |  |  |  | { | 
| 1643 | 8 |  |  | 8 | 0 | 16 | my($year,$label) = @_; | 
| 1644 | 8 |  |  |  |  | 28 | return( &Next_Monday($year,1,26) ); | 
| 1645 |  |  |  |  |  |  | } | 
| 1646 |  |  |  |  |  |  | sub AU_Christmas | 
| 1647 |  |  |  |  |  |  | { | 
| 1648 | 8 |  |  | 8 | 0 | 18 | my($year,$label) = @_; | 
| 1649 | 8 |  |  |  |  | 24 | return( &Next_Monday($year,12,25) ); | 
| 1650 |  |  |  |  |  |  | } | 
| 1651 |  |  |  |  |  |  | sub AU_Boxing | 
| 1652 |  |  |  |  |  |  | { | 
| 1653 | 8 |  |  | 8 | 0 | 14 | my($year,$label) = @_; | 
| 1654 | 8 |  |  |  |  | 23 | return( &Next_Monday_or_Tuesday($year,12,26) ); | 
| 1655 |  |  |  |  |  |  | } | 
| 1656 |  |  |  |  |  |  | sub AU_New_Year | 
| 1657 |  |  |  |  |  |  | { | 
| 1658 | 1 |  |  | 1 | 0 | 4 | my($year,$label) = @_; | 
| 1659 | 1 |  |  |  |  | 5 | return( &Next_Monday($year,1,1) ); | 
| 1660 |  |  |  |  |  |  | } | 
| 1661 |  |  |  |  |  |  | sub AU_Lauceston | 
| 1662 |  |  |  |  |  |  | { | 
| 1663 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1664 | 1 | 50 |  |  |  | 3 | if (Nth_Weekday_of_Month_Year($year,2,3,5)) | 
| 1665 | 0 |  |  |  |  | 0 | { return( Nth_Weekday_of_Month_Year($year,2,3,4) ); } | 
| 1666 |  |  |  |  |  |  | else | 
| 1667 | 1 |  |  |  |  | 4 | { return( Nth_Weekday_of_Month_Year($year,2,3,3) ); } | 
| 1668 |  |  |  |  |  |  | } | 
| 1669 |  |  |  |  |  |  | sub AU_May | 
| 1670 |  |  |  |  |  |  | { | 
| 1671 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1672 | 1 |  |  |  |  | 3 | return( &Next_Monday($year,5,1) ); | 
| 1673 |  |  |  |  |  |  | } | 
| 1674 |  |  |  |  |  |  | sub AU_QLD_Anzac | 
| 1675 |  |  |  |  |  |  | { | 
| 1676 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1677 | 1 |  |  |  |  | 3 | return( &Sunday_to_Monday($year,4,25) ); | 
| 1678 |  |  |  |  |  |  | } | 
| 1679 |  |  |  |  |  |  | sub AU_QLD_Brisbane | 
| 1680 |  |  |  |  |  |  | { | 
| 1681 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1682 | 1 | 50 |  |  |  | 4 | if (Nth_Weekday_of_Month_Year($year,8,3,5)) | 
| 1683 | 1 |  |  |  |  | 3 | { return( Nth_Weekday_of_Month_Year($year,8,3,3), '#' ); } | 
| 1684 |  |  |  |  |  |  | else | 
| 1685 | 0 |  |  |  |  | 0 | { return( Nth_Weekday_of_Month_Year($year,8,3,2), '#' ); } | 
| 1686 |  |  |  |  |  |  | } | 
| 1687 |  |  |  |  |  |  | sub AU_VIC_New_Year | 
| 1688 |  |  |  |  |  |  | { | 
| 1689 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1690 | 1 |  |  |  |  | 4 | return( &Sunday_to_Monday($year,1,1) ); | 
| 1691 |  |  |  |  |  |  | } | 
| 1692 |  |  |  |  |  |  | sub AU_VIC_Boxing | 
| 1693 |  |  |  |  |  |  | { | 
| 1694 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1695 | 1 |  |  |  |  | 4 | return( &Sunday_to_Monday($year,12,26) ); | 
| 1696 |  |  |  |  |  |  | } | 
| 1697 |  |  |  |  |  |  |  | 
| 1698 |  |  |  |  |  |  | $Profiles->{'AU-QLD'} = # Queensland | 
| 1699 |  |  |  |  |  |  | { | 
| 1700 |  |  |  |  |  |  | %{$Profiles->{'AU'}}, | 
| 1701 |  |  |  |  |  |  | "New Year's Day"            => "01.01.", | 
| 1702 |  |  |  |  |  |  | "Anzac Day"                 => \&AU_QLD_Anzac, | 
| 1703 |  |  |  |  |  |  | "Easter Saturday"           => "-1", | 
| 1704 |  |  |  |  |  |  | "Labour Day"                => "1/Mon/May", | 
| 1705 |  |  |  |  |  |  | "Queen's Birthday"          => "2/Mon/Jun", | 
| 1706 |  |  |  |  |  |  | "Royal Show (Brisbane)"     => \&AU_QLD_Brisbane | 
| 1707 |  |  |  |  |  |  | }; | 
| 1708 |  |  |  |  |  |  | $Profiles->{'AU-TAS'} = # Tasmania | 
| 1709 |  |  |  |  |  |  | { | 
| 1710 |  |  |  |  |  |  | %{$Profiles->{'AU'}}, | 
| 1711 |  |  |  |  |  |  | "New Year's Day"            => "01.01.", | 
| 1712 |  |  |  |  |  |  | "Regatta Day"               => "2/Tue/Feb", | 
| 1713 |  |  |  |  |  |  | "Lauceston Cup Day"         => \&AU_Lauceston, | 
| 1714 |  |  |  |  |  |  | "King Island Show Day"      => "1/Tue/Mar", # uncertain! (maybe Tuesday after 1/Sun/Mar?) | 
| 1715 |  |  |  |  |  |  | "Eight Hour Day"            => "2/Mon/Mar", # dubious, formula probably wrong! | 
| 1716 |  |  |  |  |  |  | "Easter Saturday"           => "-1", | 
| 1717 |  |  |  |  |  |  | "Queen's Birthday"          => "2/Mon/Jun", | 
| 1718 |  |  |  |  |  |  | "Recreation Day"            => "1/Mon/Nov"  # only North Tasmania - date not confirmed! | 
| 1719 |  |  |  |  |  |  | }; | 
| 1720 |  |  |  |  |  |  | $Profiles->{'AU-SA'} =  # South Australia | 
| 1721 |  |  |  |  |  |  | { | 
| 1722 |  |  |  |  |  |  | %{$Profiles->{'AU'}}, | 
| 1723 |  |  |  |  |  |  | "New Year's Day"            => "01.01.", | 
| 1724 |  |  |  |  |  |  | "Easter Saturday"           => "-1", | 
| 1725 |  |  |  |  |  |  | "Adelaide Cup Day"          => "3/Mon/May", # uncertain! (maybe Monday after 3/Sun/May?) | 
| 1726 |  |  |  |  |  |  | "Queen's Birthday"          => "2/Mon/Jun", | 
| 1727 |  |  |  |  |  |  | "Labour Day"                => "1/Mon/Oct", | 
| 1728 |  |  |  |  |  |  | "Proclamation Day"          => "#26.12." | 
| 1729 |  |  |  |  |  |  | }; | 
| 1730 |  |  |  |  |  |  | $Profiles->{'AU-WA'} =  # Western Australia | 
| 1731 |  |  |  |  |  |  | { | 
| 1732 |  |  |  |  |  |  | %{$Profiles->{'AU'}}, | 
| 1733 |  |  |  |  |  |  | "New Year's Day"            => "01.01.", | 
| 1734 |  |  |  |  |  |  | "Labour Day"                => "1/Mon/Mar", | 
| 1735 |  |  |  |  |  |  | "Foundation Day"            => "1/Mon/Jun", | 
| 1736 |  |  |  |  |  |  | "Queen's Birthday"          => "1/Mon/Oct" | 
| 1737 |  |  |  |  |  |  | }; | 
| 1738 |  |  |  |  |  |  | $Profiles->{'AU-ACT'} = # Australian Capital Territory | 
| 1739 |  |  |  |  |  |  | { | 
| 1740 |  |  |  |  |  |  | %{$Profiles->{'AU'}}, | 
| 1741 |  |  |  |  |  |  | "New Year's Day"            => "01.01.", | 
| 1742 |  |  |  |  |  |  | "Canberra Day"              => "2/Mon/Mar", # dubious, formula probably wrong! | 
| 1743 |  |  |  |  |  |  | "Easter Saturday"           => "-1", | 
| 1744 |  |  |  |  |  |  | "Queen's Birthday"          => "2/Mon/Jun", | 
| 1745 |  |  |  |  |  |  | "Labour Day"                => "1/Mon/Oct" | 
| 1746 |  |  |  |  |  |  | }; | 
| 1747 |  |  |  |  |  |  | $Profiles->{'AU-NSW'} = # New South Wales | 
| 1748 |  |  |  |  |  |  | { | 
| 1749 |  |  |  |  |  |  | %{$Profiles->{'AU'}}, | 
| 1750 |  |  |  |  |  |  | "New Year's Day"            => \&AU_New_Year, | 
| 1751 |  |  |  |  |  |  | "Easter Saturday"           => "-1", | 
| 1752 |  |  |  |  |  |  | "Queen's Birthday"          => "2/Mon/Jun", | 
| 1753 |  |  |  |  |  |  | "Labour Day"                => "1/Mon/Oct" | 
| 1754 |  |  |  |  |  |  | }; | 
| 1755 |  |  |  |  |  |  | $Profiles->{'AU-NT'} =  # Northern Territory | 
| 1756 |  |  |  |  |  |  | { | 
| 1757 |  |  |  |  |  |  | %{$Profiles->{'AU'}}, | 
| 1758 |  |  |  |  |  |  | "New Year's Day"            => "01.01.", | 
| 1759 |  |  |  |  |  |  | "Easter Saturday"           => "-1", | 
| 1760 |  |  |  |  |  |  | "May Day"                   => \&AU_May, | 
| 1761 |  |  |  |  |  |  | "Queen's Birthday"          => "2/Mon/Jun", | 
| 1762 |  |  |  |  |  |  | "Picnic Day"                => "1/Mon/Aug" | 
| 1763 |  |  |  |  |  |  | }; | 
| 1764 |  |  |  |  |  |  | $Profiles->{'AU-VIC'} = # Victoria | 
| 1765 |  |  |  |  |  |  | { | 
| 1766 |  |  |  |  |  |  | %{$Profiles->{'AU'}}, | 
| 1767 |  |  |  |  |  |  | "New Year's Day"            => \&AU_VIC_New_Year, | 
| 1768 |  |  |  |  |  |  | "Australia Day"             => "26.01.", | 
| 1769 |  |  |  |  |  |  | "Labour Day"                => "2/Mon/Mar", | 
| 1770 |  |  |  |  |  |  | "Queen's Birthday"          => "2/Mon/Jun", | 
| 1771 |  |  |  |  |  |  | "Melbourne Cup Day"         => "#1/Tue/Nov", # only in metropolitian municipal districts | 
| 1772 |  |  |  |  |  |  | "Christmas Day"             => "25.12.", | 
| 1773 |  |  |  |  |  |  | "Boxing Day"                => \&AU_VIC_Boxing | 
| 1774 |  |  |  |  |  |  | }; | 
| 1775 |  |  |  |  |  |  |  | 
| 1776 |  |  |  |  |  |  | # Thanks to: | 
| 1777 |  |  |  |  |  |  | # John Bolland | 
| 1778 |  |  |  |  |  |  | # Andie Posey | 
| 1779 |  |  |  |  |  |  |  | 
| 1780 |  |  |  |  |  |  | $Profiles->{'NZ'} = # New Zealand | 
| 1781 |  |  |  |  |  |  | { | 
| 1782 |  |  |  |  |  |  | "New Year's Day"            => \&NZ_New_Year, | 
| 1783 |  |  |  |  |  |  | "Day after New Year's Day"  => \&NZ_After_New_Year, | 
| 1784 |  |  |  |  |  |  | "Waitangi Day"              => "06.02.", | 
| 1785 |  |  |  |  |  |  | "St. Valentine's Day"       => "#14.02.", | 
| 1786 |  |  |  |  |  |  | "St. David's Day"           => "#01.03.", | 
| 1787 |  |  |  |  |  |  | "St. Patrick's Day"         => "#17.03.", | 
| 1788 |  |  |  |  |  |  | "St. George's Day"          => "#23.04.", | 
| 1789 |  |  |  |  |  |  | "St. Andrew's Day"          => "#30.11.", | 
| 1790 |  |  |  |  |  |  | "Good Friday"               => "-2", | 
| 1791 |  |  |  |  |  |  | "Easter Sunday"             => "+0", | 
| 1792 |  |  |  |  |  |  | "Easter Monday"             => "+1", | 
| 1793 |  |  |  |  |  |  | "Anzac Day"                 => "25.04.", | 
| 1794 |  |  |  |  |  |  | "Queen's Birthday"          => "1/Mon/Jun", | 
| 1795 |  |  |  |  |  |  | "Labour Day"                => \&NZ_Labour, | 
| 1796 |  |  |  |  |  |  | "Christmas Day"             => \&NZ_Christmas, | 
| 1797 |  |  |  |  |  |  | "Boxing Day"                => \&NZ_Boxing, | 
| 1798 |  |  |  |  |  |  | "Southland"                 => \&NZ_Southland, | 
| 1799 |  |  |  |  |  |  | "Wellington"                => \&NZ_Wellington, | 
| 1800 |  |  |  |  |  |  | "Auckland"                  => \&NZ_Auckland, | 
| 1801 |  |  |  |  |  |  | "Taranaki"                  => \&NZ_Taranaki, | 
| 1802 |  |  |  |  |  |  | "Otago"                     => \&NZ_Otago, | 
| 1803 |  |  |  |  |  |  | "South Canterbury"          => \&NZ_South_Canterbury, | 
| 1804 |  |  |  |  |  |  | "Hawkes Bay"                => \&NZ_Hawkes_Bay, | 
| 1805 |  |  |  |  |  |  | "Marlborough"               => \&NZ_Marlborough, | 
| 1806 |  |  |  |  |  |  | "North Canterbury"          => \&NZ_North_Central_Canterbury, | 
| 1807 |  |  |  |  |  |  | "Central Canterbury"        => \&NZ_North_Central_Canterbury, | 
| 1808 |  |  |  |  |  |  | "Chatham Islands"           => \&NZ_Chatham_Islands, | 
| 1809 |  |  |  |  |  |  | "Westland"                  => \&NZ_Westland, | 
| 1810 |  |  |  |  |  |  | "Christchurch Show Day"     => \&NZ_Christchurch | 
| 1811 |  |  |  |  |  |  | }; | 
| 1812 |  |  |  |  |  |  |  | 
| 1813 |  |  |  |  |  |  | sub NZ_New_Year | 
| 1814 |  |  |  |  |  |  | { | 
| 1815 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1816 | 1 |  |  |  |  | 3 | return( &Next_Monday($year,1,1) ); | 
| 1817 |  |  |  |  |  |  | } | 
| 1818 |  |  |  |  |  |  | sub NZ_After_New_Year | 
| 1819 |  |  |  |  |  |  | { | 
| 1820 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1821 | 1 |  |  |  |  | 4 | return( &Next_Monday_or_Tuesday($year,1,2) ); | 
| 1822 |  |  |  |  |  |  | } | 
| 1823 |  |  |  |  |  |  | sub NZ_Labour | 
| 1824 |  |  |  |  |  |  | { | 
| 1825 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1826 | 1 |  |  |  |  | 4 | return( &Next_Monday($year,10,22) ); | 
| 1827 |  |  |  |  |  |  | } | 
| 1828 |  |  |  |  |  |  | sub NZ_Christmas | 
| 1829 |  |  |  |  |  |  | { | 
| 1830 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1831 | 1 |  |  |  |  | 3 | return( &Next_Monday($year,12,25) ); | 
| 1832 |  |  |  |  |  |  | } | 
| 1833 |  |  |  |  |  |  | sub NZ_Boxing | 
| 1834 |  |  |  |  |  |  | { | 
| 1835 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1836 | 1 |  |  |  |  | 4 | return( &Next_Monday_or_Tuesday($year,12,26) ); | 
| 1837 |  |  |  |  |  |  | } | 
| 1838 |  |  |  |  |  |  |  | 
| 1839 |  |  |  |  |  |  | sub NZ_Southland | 
| 1840 |  |  |  |  |  |  | { | 
| 1841 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1842 | 1 |  |  |  |  | 4 | return( &Next_Monday($year,1,15), '#' ); | 
| 1843 |  |  |  |  |  |  | } | 
| 1844 |  |  |  |  |  |  | sub NZ_Wellington | 
| 1845 |  |  |  |  |  |  | { | 
| 1846 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1847 | 1 |  |  |  |  | 4 | return( &Next_Monday($year,1,22), '#' ); | 
| 1848 |  |  |  |  |  |  | } | 
| 1849 |  |  |  |  |  |  | sub NZ_Auckland | 
| 1850 |  |  |  |  |  |  | { | 
| 1851 | 1 |  |  | 1 | 0 | 3 | my($year,$label) = @_; | 
| 1852 | 1 |  |  |  |  | 5 | return( &Next_Monday($year,1,29), '#' ); | 
| 1853 |  |  |  |  |  |  | } | 
| 1854 |  |  |  |  |  |  | sub NZ_Taranaki | 
| 1855 |  |  |  |  |  |  | { | 
| 1856 | 1 |  |  | 1 | 0 | 167 | my($year,$label) = @_; | 
| 1857 | 1 |  |  |  |  | 4 | return( &Next_Monday($year,3,12), '#' ); | 
| 1858 |  |  |  |  |  |  | } | 
| 1859 |  |  |  |  |  |  | sub NZ_Otago | 
| 1860 |  |  |  |  |  |  | { | 
| 1861 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1862 | 1 |  |  |  |  | 4 | return( &Next_Monday($year,3,26), '#' ); | 
| 1863 |  |  |  |  |  |  | } | 
| 1864 |  |  |  |  |  |  | sub NZ_South_Canterbury | 
| 1865 |  |  |  |  |  |  | { | 
| 1866 | 1 |  |  | 1 | 0 | 3 | my($year,$label) = @_; | 
| 1867 | 1 |  |  |  |  | 4 | return( &Next_Monday($year,9,24), '#' ); | 
| 1868 |  |  |  |  |  |  | } | 
| 1869 |  |  |  |  |  |  | sub NZ_Hawkes_Bay | 
| 1870 |  |  |  |  |  |  | { | 
| 1871 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1872 | 1 |  |  |  |  | 3 | return( &Previous_Friday($year,10,19), '#' ); | 
| 1873 |  |  |  |  |  |  | } | 
| 1874 |  |  |  |  |  |  | sub NZ_Marlborough | 
| 1875 |  |  |  |  |  |  | { | 
| 1876 | 1 |  |  | 1 | 0 | 3 | my($year,$label) = @_; | 
| 1877 | 1 |  |  |  |  | 4 | return( &Next_Monday($year,10,29), '#' ); | 
| 1878 |  |  |  |  |  |  | } | 
| 1879 |  |  |  |  |  |  | sub NZ_North_Central_Canterbury | 
| 1880 |  |  |  |  |  |  | { | 
| 1881 | 2 |  |  | 2 | 0 | 3 | my($year,$label) = @_; | 
| 1882 | 2 |  |  |  |  | 14 | return( &Previous_Friday($year,11,16), '#' ); | 
| 1883 |  |  |  |  |  |  | } | 
| 1884 |  |  |  |  |  |  | sub NZ_Chatham_Islands | 
| 1885 |  |  |  |  |  |  | { | 
| 1886 | 1 |  |  | 1 | 0 | 3 | my($year,$label) = @_; | 
| 1887 | 1 |  |  |  |  | 4 | return( &Next_Monday($year,12,3), '#' ); | 
| 1888 |  |  |  |  |  |  | } | 
| 1889 |  |  |  |  |  |  | sub NZ_Westland | 
| 1890 |  |  |  |  |  |  | { | 
| 1891 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1892 | 1 |  |  |  |  | 3 | return( &Next_Monday($year,12,3), '#' ); | 
| 1893 |  |  |  |  |  |  | } | 
| 1894 |  |  |  |  |  |  | sub NZ_Christchurch | 
| 1895 |  |  |  |  |  |  | { | 
| 1896 | 1 |  |  | 1 | 0 | 2 | my($year,$label) = @_; | 
| 1897 | 1 |  |  |  |  | 4 | return( &Previous_Friday($year,11,9), '#' ); | 
| 1898 |  |  |  |  |  |  | } | 
| 1899 |  |  |  |  |  |  |  | 
| 1900 |  |  |  |  |  |  | # Thanks to: | 
| 1901 |  |  |  |  |  |  | # Ana Maria Lopes Monteiro | 
| 1902 |  |  |  |  |  |  | # Pe. Amâncio | 
| 1903 |  |  |  |  |  |  | # Inêz Hiltrop | 
| 1904 |  |  |  |  |  |  | # http://www.imagensbahia.com.br/calend.htm | 
| 1905 |  |  |  |  |  |  | # http://www.hotelonline.com.br/menu/datas.htm | 
| 1906 |  |  |  |  |  |  | # http://www.mec.gov.br/acs/relpublc/datas.shtm | 
| 1907 |  |  |  |  |  |  |  | 
| 1908 |  |  |  |  |  |  | $Profiles->{'BR'} = # Brasil | 
| 1909 |  |  |  |  |  |  | { | 
| 1910 |  |  |  |  |  |  | # Feriados oficiais variaveis: | 
| 1911 |  |  |  |  |  |  |  | 
| 1912 |  |  |  |  |  |  | "Carnaval"                                                                       => "-47", | 
| 1913 |  |  |  |  |  |  | "Paixão de Cristo"                                                               => "-2", | 
| 1914 |  |  |  |  |  |  | "Corpus Christi"                                                                 => "+60", | 
| 1915 |  |  |  |  |  |  |  | 
| 1916 |  |  |  |  |  |  | # Feriados oficiais fixos: | 
| 1917 |  |  |  |  |  |  |  | 
| 1918 |  |  |  |  |  |  | "Ano Novo"                                                                       => "01-01", | 
| 1919 |  |  |  |  |  |  | "Tiradentes (Patrono Cívico da Nação Brasileira)"                                => "21-04", | 
| 1920 |  |  |  |  |  |  | "Dia (Mundial) do Trabalho"                                                      => "01-05", | 
| 1921 |  |  |  |  |  |  | "Dia da Independência do Brasil (1822)"                                          => "07-09", | 
| 1922 |  |  |  |  |  |  | "N. Sra. Aparecida (Padroeira do Brasil)"                                        => "12-10", | 
| 1923 |  |  |  |  |  |  | "Finados"                                                                        => "02-11", | 
| 1924 |  |  |  |  |  |  | "Proclamação da República dos Estados Unidos do Brasil (1889)"                   => "15-11", | 
| 1925 |  |  |  |  |  |  | "Natal"                                                                          => "25-12", | 
| 1926 |  |  |  |  |  |  |  | 
| 1927 |  |  |  |  |  |  | # Dias comemorativos variaveis: | 
| 1928 |  |  |  |  |  |  |  | 
| 1929 |  |  |  |  |  |  | "Segunda-Feira de Carnaval"                                                      => "#-48", | 
| 1930 |  |  |  |  |  |  | "Cinzas"                                                                         => "#-46", | 
| 1931 |  |  |  |  |  |  | "Aleluia"                                                                        => "#-1", | 
| 1932 |  |  |  |  |  |  | "Páscoa"                                                                         => "#+0", | 
| 1933 |  |  |  |  |  |  | "Ascensão do Senhor"                                                             => "#+39", | 
| 1934 |  |  |  |  |  |  | "Pentecostes"                                                                    => "#+49", | 
| 1935 |  |  |  |  |  |  | "Dia Mundial da Oração"                                                          => "#1/Fri/Mar", | 
| 1936 |  |  |  |  |  |  | "Dia das Mães"                                                                   => "#2/Sun/May", | 
| 1937 |  |  |  |  |  |  | "Dia dos Pais"                                                                   => "#2/Sun/Aug", | 
| 1938 |  |  |  |  |  |  | "Dia da Bíblia"                                                                  => "#5/Sun/Sep", | 
| 1939 |  |  |  |  |  |  | "Dia Universal da Criança"                                                       => "#1/Mon/Oct", | 
| 1940 |  |  |  |  |  |  | "Dia do Securitário"                                                             => "#3/Mon/Oct", | 
| 1941 |  |  |  |  |  |  |  | 
| 1942 |  |  |  |  |  |  | # Sinonimos: | 
| 1943 |  |  |  |  |  |  |  | 
| 1944 |  |  |  |  |  |  | #   "Dia da Ressaca"                                                                 => "#-46", # >;-) | 
| 1945 |  |  |  |  |  |  | "Sexta-Feira Santa"                                                              => "#-2", | 
| 1946 |  |  |  |  |  |  | "Dia Mundial da Paz"                                                             => "#01-01", | 
| 1947 |  |  |  |  |  |  | "Confraternização Universal"                                                     => "#01-01", | 
| 1948 |  |  |  |  |  |  | #   "Fraternidade Universal"                                                         => "#01-01", | 
| 1949 |  |  |  |  |  |  | "Santos Reis"                                                                    => "#06-01", | 
| 1950 |  |  |  |  |  |  | "Inconfidência Mineira"                                                          => "#21-04", | 
| 1951 |  |  |  |  |  |  | "Todas as Almas"                                                                 => "#02-11", | 
| 1952 |  |  |  |  |  |  | "Natividade de Jesus"                                                            => "#25-12", | 
| 1953 |  |  |  |  |  |  | #   "Natividade do Senhor"                                                           => "#25-12", | 
| 1954 |  |  |  |  |  |  |  | 
| 1955 |  |  |  |  |  |  | # Datas especiais: | 
| 1956 |  |  |  |  |  |  |  | 
| 1957 |  |  |  |  |  |  | "Eleições"                                                                       => "#03-10", | 
| 1958 |  |  |  |  |  |  | "Início do Outono"                                                               => "#21-03", | 
| 1959 |  |  |  |  |  |  | "Início do Inverno"                                                              => "#21-06", | 
| 1960 |  |  |  |  |  |  | "Início da Primavera"                                                            => "#23-09", | 
| 1961 |  |  |  |  |  |  | "Início do Verão"                                                                => "#22-12", | 
| 1962 |  |  |  |  |  |  | #   "Começo do Horário de Verão"                                                     => "#??-??", | 
| 1963 |  |  |  |  |  |  | #   "Fim do Horário de Verão"                                                        => "#??-??", | 
| 1964 |  |  |  |  |  |  |  | 
| 1965 |  |  |  |  |  |  | # Dias comemorativos (datas contraditorias ou duvidosas): | 
| 1966 |  |  |  |  |  |  |  | 
| 1967 |  |  |  |  |  |  | "Início da Semana Nacional contra o Alcoolismo"                                  => "#18-02", # (1) = 3/Sun/Feb ? | 
| 1968 |  |  |  |  |  |  | "Início da Semana da Educação (1ª Semana)"                                       => "#02-07", # (1) = 1/Sun/Jul ? | 
| 1969 |  |  |  |  |  |  | "Início da Semana do Exército"                                                   => "#18-08", # (1) = 3/Sun/Aug ? | 
| 1970 |  |  |  |  |  |  | "Início da Semana do Livro Escolar"                                              => "#19-08", # (1) = 3/Sun/Aug ? | 
| 1971 |  |  |  |  |  |  | "Início da Semana do Portador de Síndrome de Down"                               => "#21-08", # (1) = 4/Sun/Aug ? | 
| 1972 |  |  |  |  |  |  | "Início da Semana da Pátria"                                                     => "#01-09", # (2) = 1/Sun/Sep ? | 
| 1973 |  |  |  |  |  |  | "Início da Semana do Trânsito"                                                   => "#19-09", # (1) = 3/Sun/Sep ? | 
| 1974 |  |  |  |  |  |  | "Dia do Trânsito"                                                                => "#25-09", # (2) | 
| 1975 |  |  |  |  |  |  | "Início da Semana da Asa"                                                        => "#17-10", # (1) = 3/Sun/Oct ? | 
| 1976 |  |  |  |  |  |  |  | 
| 1977 |  |  |  |  |  |  | "Dia do Agricultor"                                                              => "#28-07", # (2) | 
| 1978 |  |  |  |  |  |  | "Dia do Engenheiro Agrônomo"                                                     => "#12-10", # (1) | 
| 1979 |  |  |  |  |  |  | "Dia do Agrônomo"                                                                => "#11-12", # (1) | 
| 1980 |  |  |  |  |  |  |  | 
| 1981 |  |  |  |  |  |  | "Dia Nacional da Alfabetização"                                                  => "#08-09", # (2) | 
| 1982 |  |  |  |  |  |  | #   "Dia da Alfabetização"                                                           => "#08-09", # (2) | 
| 1983 |  |  |  |  |  |  | #   "Dia Nacional da Alfabetização"                                                  => "#14-11", # (1) | 
| 1984 |  |  |  |  |  |  | #   "Dia Nacional da Alfabetização"                                                  => "#15-11", # (1) | 
| 1985 |  |  |  |  |  |  |  | 
| 1986 |  |  |  |  |  |  | #   "Dia da Amizade"                                                                 => "#23-06", # (1) | 
| 1987 |  |  |  |  |  |  | "Dia Internacional da Amizade"                                                   => "#20-07", # (1) | 
| 1988 |  |  |  |  |  |  | "Dia Mundial da Amizade"                                                         => "#20-07", # (2) | 
| 1989 |  |  |  |  |  |  | "Dia da Amizade"                                                                 => "#20-07", # (1) | 
| 1990 |  |  |  |  |  |  | "Dia do Amigo"                                                                   => "#20-07", # (1) | 
| 1991 |  |  |  |  |  |  |  | 
| 1992 |  |  |  |  |  |  | "Dia dos Aposentados"                                                            => "#24-01", # (1) | 
| 1993 |  |  |  |  |  |  | "Dia do Professor Aposentado"                                                    => "#15-05", # (1) | 
| 1994 |  |  |  |  |  |  | "Dia do Funcionário Público Aposentado"                                          => "#17-06", # (2) | 
| 1995 |  |  |  |  |  |  | "Dia do Aposentado"                                                              => "#08-11", # (1) | 
| 1996 |  |  |  |  |  |  |  | 
| 1997 |  |  |  |  |  |  | "Dia do Idoso"                                                                   => "#27-02", # (1) | 
| 1998 |  |  |  |  |  |  | "Dia dos Idosos"                                                                 => "#07-10", # (1) | 
| 1999 |  |  |  |  |  |  |  | 
| 2000 |  |  |  |  |  |  | "Dia do Artista"                                                                 => "#23-08", # (1) | 
| 2001 |  |  |  |  |  |  | "Dia dos Artistas"                                                               => "#24-08", # (1) | 
| 2002 |  |  |  |  |  |  |  | 
| 2003 |  |  |  |  |  |  | #   "Dia do Atleta"                                                                  => "#10-02", # (1) | 
| 2004 |  |  |  |  |  |  | "Dia do Atletismo"                                                               => "#12-10", # (1) | 
| 2005 |  |  |  |  |  |  | "Dia do Atleta Profissional"                                                     => "#19-12", # (1) | 
| 2006 |  |  |  |  |  |  | "Dia do Atleta"                                                                  => "#21-12", # (2) | 
| 2007 |  |  |  |  |  |  |  | 
| 2008 |  |  |  |  |  |  | "Dia das Bandeiras"                                                              => "#30-05", # (1) | 
| 2009 |  |  |  |  |  |  | "Dia dos Símbolos Nacionais"                                                     => "#18-09", # (1) | 
| 2010 |  |  |  |  |  |  | "Dia da Bandeira"                                                                => "#19-11", # (4) | 
| 2011 |  |  |  |  |  |  |  | 
| 2012 |  |  |  |  |  |  | "Dia dos Bandeirantes"                                                           => "#08-08", # (1) | 
| 2013 |  |  |  |  |  |  | "Dia do Bandeirante"                                                             => "#14-11", # (1) | 
| 2014 |  |  |  |  |  |  |  | 
| 2015 |  |  |  |  |  |  | "Dia do Barbeiro"                                                                => "#06-09", # (1) | 
| 2016 |  |  |  |  |  |  | "Dia do Barbeiro"                                                                => "#03-11", # (1) | 
| 2017 |  |  |  |  |  |  |  | 
| 2018 |  |  |  |  |  |  | "Dia do Bombeiro"                                                                => "#01-07", # (1) | 
| 2019 |  |  |  |  |  |  | "Dia dos Bombeiros Brasileiros"                                                  => "#02-07", # (1) | 
| 2020 |  |  |  |  |  |  |  | 
| 2021 |  |  |  |  |  |  | "Dia do Industrial do Café"                                                      => "#12-03", # (1) | 
| 2022 |  |  |  |  |  |  | "Dia Pan-Americano do Café"                                                      => "#14-04", # (1) | 
| 2023 |  |  |  |  |  |  | "Dia do Café"                                                                    => "#14-04", # (1) | 
| 2024 |  |  |  |  |  |  | #   "Dia do Café"                                                                    => "#24-05", # (1) | 
| 2025 |  |  |  |  |  |  |  | 
| 2026 |  |  |  |  |  |  | "Dia do Carteiro"                                                                => "#25-01", # (2) | 
| 2027 |  |  |  |  |  |  | #   "Dia do Carteiro"                                                                => "#05-08", # (1) | 
| 2028 |  |  |  |  |  |  |  | 
| 2029 |  |  |  |  |  |  | "Criação dos Correios no Brasil"                                                 => "#25-01", # (1) | 
| 2030 |  |  |  |  |  |  | "Dia do Correio"                                                                 => "#08-04", # (1) | 
| 2031 |  |  |  |  |  |  | "Dia do Correio Aéreo Nacional"                                                  => "#12-06", # (1) | 
| 2032 |  |  |  |  |  |  | "Dia Postal Mundial"                                                             => "#09-10", # (1) | 
| 2033 |  |  |  |  |  |  |  | 
| 2034 |  |  |  |  |  |  | #   "Dia Universal da Criança"                                                       => "#1/Mon/Oct", | 
| 2035 |  |  |  |  |  |  | "Dia da Criança"                                                                 => "#12-10", | 
| 2036 |  |  |  |  |  |  |  | 
| 2037 |  |  |  |  |  |  | "Dia do Enfermo"                                                                 => "#14-01", # (1) | 
| 2038 |  |  |  |  |  |  | "Dia Mundial do Enfermo"                                                         => "#11-02", # (1) | 
| 2039 |  |  |  |  |  |  |  | 
| 2040 |  |  |  |  |  |  | #   "Dia da Escola"                                                                  => "#15-03", # (1) | 
| 2041 |  |  |  |  |  |  | "Dia da Escola"                                                                  => "#19-03", # (3) | 
| 2042 |  |  |  |  |  |  |  | 
| 2043 |  |  |  |  |  |  | "Dia do Escritor Paulista"                                                       => "#29-06", # (1) | 
| 2044 |  |  |  |  |  |  | #   "Dia do Escritor"                                                                => "#25-07", # (2) | 
| 2045 |  |  |  |  |  |  | "Dia do Escritor"                                                                => "#13-10", # (3) | 
| 2046 |  |  |  |  |  |  |  | 
| 2047 |  |  |  |  |  |  | "Dia do Estudante (Feriado Escolar)"                                             => "#11-08", # (4) | 
| 2048 |  |  |  |  |  |  | "Dia Internacional do Estudante"                                                 => "#17-11", # (1) | 
| 2049 |  |  |  |  |  |  |  | 
| 2050 |  |  |  |  |  |  | #   "Dia do Folclore"                                                                => "#19-08", # (1) | 
| 2051 |  |  |  |  |  |  | "Dia do Folclore"                                                                => "#22-08", # (4) | 
| 2052 |  |  |  |  |  |  |  | 
| 2053 |  |  |  |  |  |  | "Dia Mundial Sem Fumar"                                                          => "#07-04", # (1) | 
| 2054 |  |  |  |  |  |  | "Dia Mundial do Combate ao Fumo"                                                 => "#31-05", # (1) | 
| 2055 |  |  |  |  |  |  | "Dia Mundial Sem Tabaco"                                                         => "#31-05", # (1) | 
| 2056 |  |  |  |  |  |  | "Dia Nacional de Combate ao Fumo"                                                => "#29-08", # (1) | 
| 2057 |  |  |  |  |  |  | "Dia do Fumar"                                                                   => "#16-11", # (1) | 
| 2058 |  |  |  |  |  |  |  | 
| 2059 |  |  |  |  |  |  | "Dia da Saúde e Nutrição"                                                        => "#31-03", # (1) | 
| 2060 |  |  |  |  |  |  | "Dia Mundial da Saúde"                                                           => "#07-04", # (4) | 
| 2061 |  |  |  |  |  |  | "Dia Nacional da Saúde"                                                          => "#05-08", # (4) | 
| 2062 |  |  |  |  |  |  | "Dia da Saúde Dentária"                                                          => "#25-10", # (1) | 
| 2063 |  |  |  |  |  |  | "Dia Pan-Americano da Saúde"                                                     => "#02-12", # (1) | 
| 2064 |  |  |  |  |  |  |  | 
| 2065 |  |  |  |  |  |  | "Dia do Hino Nacional"                                                           => "#13-04", # (1) | 
| 2066 |  |  |  |  |  |  | "Dia do Hino Nacional"                                                           => "#06-09", # (1) | 
| 2067 |  |  |  |  |  |  |  | 
| 2068 |  |  |  |  |  |  | "Dia do Hoteleiro"                                                               => "#11-08", # (1) | 
| 2069 |  |  |  |  |  |  | "Dia do Hoteleiro"                                                               => "#09-11", # (1) | 
| 2070 |  |  |  |  |  |  |  | 
| 2071 |  |  |  |  |  |  | "Festa de Iemanjá"                                                               => "#02-02", # (2) | 
| 2072 |  |  |  |  |  |  | #   "Festa de Iemanjá"                                                               => "#08-12", # (1) | 
| 2073 |  |  |  |  |  |  | "Festa de Iemanjá em São Paulo e Paraíba"                                        => "#08-12", # (1) | 
| 2074 |  |  |  |  |  |  |  | 
| 2075 |  |  |  |  |  |  | "Fundação da Associação Brasileira de Imprensa (ABI)"                            => "#07-04", # (1) | 
| 2076 |  |  |  |  |  |  | "Dia Nacional da Imprensa"                                                       => "#01-06", # (1) | 
| 2077 |  |  |  |  |  |  | "Dia da Liberdade de Imprensa"                                                   => "#07-06", # (2) | 
| 2078 |  |  |  |  |  |  | "Dia Internacional da Liberdade de Imprensa"                                     => "#10-06", # (1) | 
| 2079 |  |  |  |  |  |  | "Dia da Imprensa"                                                                => "#10-09", # (4) | 
| 2080 |  |  |  |  |  |  |  | 
| 2081 |  |  |  |  |  |  | "Dia da Infância"                                                                => "#20-08", # (3) | 
| 2082 |  |  |  |  |  |  | "Dia da Infância"                                                                => "#24-08", # (1) | 
| 2083 |  |  |  |  |  |  |  | 
| 2084 |  |  |  |  |  |  | "Dia do Jornalista"                                                              => "#29-01", # (1) | 
| 2085 |  |  |  |  |  |  | "Dia do Jornalismo"                                                              => "#07-04", # (2) | 
| 2086 |  |  |  |  |  |  | "Dia Nacional do Jornaleiro"                                                     => "#30-09", # (1) | 
| 2087 |  |  |  |  |  |  |  | 
| 2088 |  |  |  |  |  |  | "Dia dos Jovens"                                                                 => "#13-04", # (2) | 
| 2089 |  |  |  |  |  |  | "Dia Internacional do Jovem Trabalhador"                                         => "#24-04", # (4) | 
| 2090 |  |  |  |  |  |  | "Dia da Juventude Operária Católica"                                             => "#29-04", # (1) | 
| 2091 |  |  |  |  |  |  | "Dia da Juventude Constitucionalista"                                            => "#23-05", # (1) | 
| 2092 |  |  |  |  |  |  | "Dia Nacional da Juventude"                                                      => "#22-09", # (2) | 
| 2093 |  |  |  |  |  |  | "Dia Mundial da Juventude"                                                       => "#04-10", # (1) | 
| 2094 |  |  |  |  |  |  |  | 
| 2095 |  |  |  |  |  |  | "Dia Mundial do Leonino"                                                         => "#08-10", # (1) | 
| 2096 |  |  |  |  |  |  | "Dia Mundial do Lions Clube"                                                     => "#10-10", # (1) | 
| 2097 |  |  |  |  |  |  |  | 
| 2098 |  |  |  |  |  |  | "Dia do Livro"                                                                   => "#19-03", # (2) | 
| 2099 |  |  |  |  |  |  | #   "Dia do Livro"                                                                   => "#18-04", # (1) | 
| 2100 |  |  |  |  |  |  | "Dia Nacional do Livro"                                                          => "#29-10", # (2) | 
| 2101 |  |  |  |  |  |  | #   "Dia do Livro"                                                                   => "#23-11", # (1) | 
| 2102 |  |  |  |  |  |  | "Dia Internacional do Livro"                                                     => "#23-11", # (1) | 
| 2103 |  |  |  |  |  |  |  | 
| 2104 |  |  |  |  |  |  | "Dia Internacional do Livro Infantil"                                            => "#02-04", # (3) | 
| 2105 |  |  |  |  |  |  | #   "Dia Internacional do Livro Infantil"                                            => "#02-09", # (2) | 
| 2106 |  |  |  |  |  |  | "Dia Nacional do Livro Infantil"                                                 => "#18-04", # (3) | 
| 2107 |  |  |  |  |  |  |  | 
| 2108 |  |  |  |  |  |  | "Dia Oficial da Música"                                                          => "#21-11", # (1) | 
| 2109 |  |  |  |  |  |  | "Dia do Músico"                                                                  => "#22-11", # (1) | 
| 2110 |  |  |  |  |  |  |  | 
| 2111 |  |  |  |  |  |  | "Dia Mundial da Água (ONU)"                                                      => "#22-03", # (2) | 
| 2112 |  |  |  |  |  |  | "Dia da Organização das Nações Unidas (ONU)"                                     => "#25-04", # (1) | 
| 2113 |  |  |  |  |  |  | "Dia das Nações Unidas (ONU) (1945)"                                               => "#24-10", # (4) | 
| 2114 |  |  |  |  |  |  |  | 
| 2115 |  |  |  |  |  |  | "N. Sra. Rainha da Paz"                                                          => "#09-07", # (1) | 
| 2116 |  |  |  |  |  |  | "N. Sra. Rainha da Paz"                                                          => "#22-08", # (1) | 
| 2117 |  |  |  |  |  |  |  | 
| 2118 |  |  |  |  |  |  | "N. Sra. da Penha (Feriado Escolar)"                                             => "#24-04", # (1) | 
| 2119 |  |  |  |  |  |  | #   "N. Sra. da Penha"                                                               => "#24-04", # (2) | 
| 2120 |  |  |  |  |  |  | #   "N. Sra. da Penha"                                                               => "#08-09", # (1) | 
| 2121 |  |  |  |  |  |  |  | 
| 2122 |  |  |  |  |  |  | "Dia da Liberdade de Pensamento"                                                 => "#14-07", # (2) | 
| 2123 |  |  |  |  |  |  | "Dia do Pensamento"                                                              => "#13-08", # (1) | 
| 2124 |  |  |  |  |  |  |  | 
| 2125 |  |  |  |  |  |  | "Dia do Petróleo"                                                                => "#29-09", # (1) | 
| 2126 |  |  |  |  |  |  | "Dia do Petróleo Brasileiro"                                                     => "#03-10", # (2) | 
| 2127 |  |  |  |  |  |  |  | 
| 2128 |  |  |  |  |  |  | "Dia do Profissional de Marketing"                                               => "#08-04", # (1) | 
| 2129 |  |  |  |  |  |  | "Dia do Profissional de Marketing"                                               => "#08-05", # (1) | 
| 2130 |  |  |  |  |  |  |  | 
| 2131 |  |  |  |  |  |  | "Dia do Publicitário"                                                            => "#01-02", # (1) | 
| 2132 |  |  |  |  |  |  | "Dia do Publicitário"                                                            => "#04-12", # (1) | 
| 2133 |  |  |  |  |  |  |  | 
| 2134 |  |  |  |  |  |  | "Dia do Repórter"                                                                => "#16-02", # (2) | 
| 2135 |  |  |  |  |  |  | #   "Dia do Repórter"                                                                => "#17-02", # (1) | 
| 2136 |  |  |  |  |  |  | "Dia do Repórter Fotográfico"                                                    => "#02-09", # (1) | 
| 2137 |  |  |  |  |  |  |  | 
| 2138 |  |  |  |  |  |  | #   "Dia da Televisão"                                                               => "#11-08", # (2) | 
| 2139 |  |  |  |  |  |  | "Santa Clara de Assis (Padroeira da Televisão)"                                  => "#11-08", # (1) | 
| 2140 |  |  |  |  |  |  | #   "Dia da Padroeira da Televisão (Santa Clara de Assis)"                           => "#12-08", # (1) | 
| 2141 |  |  |  |  |  |  |  | 
| 2142 |  |  |  |  |  |  | "Santa Isabel"                                                                   => "#04-07", # (1) | 
| 2143 |  |  |  |  |  |  | "Santa Isabel"                                                                   => "#05-11", # (1) | 
| 2144 |  |  |  |  |  |  |  | 
| 2145 |  |  |  |  |  |  | "Santa Terezinha (Tereza do Menino Jesus)"                                       => "#01-10", # (2) | 
| 2146 |  |  |  |  |  |  | #   "Santa Tereza"                                                                   => "#15-10", # (1) | 
| 2147 |  |  |  |  |  |  |  | 
| 2148 |  |  |  |  |  |  | "Dia Mundial das Vocações Sacerdotais"                                           => "#25-04", # (1) | 
| 2149 |  |  |  |  |  |  | "Dia Mundial das Vocações"                                                       => "#26-04", # (1) | 
| 2150 |  |  |  |  |  |  | "Dia Mundial das Vocações"                                                       => "#02-05", # (1) | 
| 2151 |  |  |  |  |  |  |  | 
| 2152 |  |  |  |  |  |  | "Dia do Comissário de Bordo"                                                     => "#31-05", # (1) | 
| 2153 |  |  |  |  |  |  | "Dia Internacional do Controlador de Vôo"                                        => "#18-10", # (1) | 
| 2154 |  |  |  |  |  |  | "Dia Mundial do Comissário de Vôo"                                               => "#31-10", # (1) | 
| 2155 |  |  |  |  |  |  |  | 
| 2156 |  |  |  |  |  |  | # Dias comemorativos fixos (sem garantias!): | 
| 2157 |  |  |  |  |  |  |  | 
| 2158 |  |  |  |  |  |  | "Dia dos Municípios"                                                             => "#01-01", | 
| 2159 |  |  |  |  |  |  | "Maria Santíssima Mãe de Deus"                                                   => "#01-01", | 
| 2160 |  |  |  |  |  |  | "Dia Nacional da Abreugrafia"                                                    => "#03-01", | 
| 2161 |  |  |  |  |  |  | "Dia da Criação do Estado de Rondônia-RO"                                        => "#04-01", | 
| 2162 |  |  |  |  |  |  | "Criação da Primeira Tipografia no Brasil"                                       => "#05-01", | 
| 2163 |  |  |  |  |  |  | "Reis Magos"                                                                     => "#06-01", | 
| 2164 |  |  |  |  |  |  | "Dia da Gratidão"                                                                => "#06-01", | 
| 2165 |  |  |  |  |  |  | "Dia da Liberdade de Cultos"                                                     => "#07-01", | 
| 2166 |  |  |  |  |  |  | "Dia do Leitor"                                                                  => "#07-01", | 
| 2167 |  |  |  |  |  |  | "Batismo do Senhor"                                                              => "#08-01", | 
| 2168 |  |  |  |  |  |  | "Dia do Fotógrafo"                                                               => "#08-01", | 
| 2169 |  |  |  |  |  |  | "Dia do Fico"                                                                    => "#09-01", | 
| 2170 |  |  |  |  |  |  | "Dia do Empresário de Contabilidade"                                             => "#12-01", | 
| 2171 |  |  |  |  |  |  | "Criação do Museu Nacional de Belas Artes (1937)"                                => "#13-01", | 
| 2172 |  |  |  |  |  |  | "Dia Mundial do Compositor"                                                      => "#15-01", | 
| 2173 |  |  |  |  |  |  | "Dia do Museu de Arte Moderna do Rio de Janeiro"                                 => "#15-01", | 
| 2174 |  |  |  |  |  |  | "Dia dos Tribunais de Contas"                                                    => "#17-01", | 
| 2175 |  |  |  |  |  |  | "Dia Nacional do Fusca"                                                          => "#20-01", | 
| 2176 |  |  |  |  |  |  | "Dia de Oxalá"                                                                   => "#20-01", | 
| 2177 |  |  |  |  |  |  | "Dia do Farmacêutico"                                                            => "#20-01", | 
| 2178 |  |  |  |  |  |  | "São Sebastião (Padroeiro da Cidade do Rio de Janeiro)"                          => "#20-01", | 
| 2179 |  |  |  |  |  |  | "Dia Mundial da Religião"                                                        => "#21-01", | 
| 2180 |  |  |  |  |  |  | "Santa Inês"                                                                     => "#21-01", | 
| 2181 |  |  |  |  |  |  | "São Vicente"                                                                    => "#22-01", | 
| 2182 |  |  |  |  |  |  | "Dia da Previdência Social"                                                      => "#24-01", | 
| 2183 |  |  |  |  |  |  | "Instituição do Casamento Cívil no Brasil"                                       => "#24-01", | 
| 2184 |  |  |  |  |  |  | "Promulgação da Constituição (1967)"                                             => "#24-01", | 
| 2185 |  |  |  |  |  |  | "Fundação da Cidade de São Paulo (1554)"                                         => "#25-01", | 
| 2186 |  |  |  |  |  |  | "Elevação do Brasil a Vice-Reinado (1763)"                                       => "#27-01", | 
| 2187 |  |  |  |  |  |  | "Santa Ângela de Médici"                                                         => "#27-01", | 
| 2188 |  |  |  |  |  |  | "Abertura dos Pontos no Brasil (1808)"                                           => "#28-01", | 
| 2189 |  |  |  |  |  |  | "Dia Nacional das Histórias em Quadrinhos"                                       => "#30-01", | 
| 2190 |  |  |  |  |  |  | "Dia da Saudade"                                                                 => "#30-01", | 
| 2191 |  |  |  |  |  |  | "Dia do Portuário (Portuária)"                                                   => "#30-01", | 
| 2192 |  |  |  |  |  |  | "Dia Mundial do Mágico"                                                          => "#31-01", | 
| 2193 |  |  |  |  |  |  | "São João Bosco"                                                                 => "#31-01", | 
| 2194 |  |  |  |  |  |  | "Dia da Solidariedade"                                                           => "#31-01", | 
| 2195 |  |  |  |  |  |  | "Dia do Agente Fiscal"                                                           => "#02-02", | 
| 2196 |  |  |  |  |  |  | "N. Sra. dos Navegantes"                                                         => "#02-02", | 
| 2197 |  |  |  |  |  |  | "São Brás"                                                                       => "#03-02", | 
| 2198 |  |  |  |  |  |  | "Dia da Papiloscopia"                                                            => "#05-02", | 
| 2199 |  |  |  |  |  |  | "Dia do Datiloscopista (Datiloscopia)"                                           => "#05-02", | 
| 2200 |  |  |  |  |  |  | "Dia do Gráfico"                                                                 => "#07-02", | 
| 2201 |  |  |  |  |  |  | "Santa Apolônia (Dentistas)"                                                     => "#09-02", | 
| 2202 |  |  |  |  |  |  | "Criação da Casa da Moeda"                                                       => "#10-02", | 
| 2203 |  |  |  |  |  |  | "Santa Escolástica"                                                              => "#10-02", | 
| 2204 |  |  |  |  |  |  | "Dia do Zelador"                                                                 => "#11-02", | 
| 2205 |  |  |  |  |  |  | "N. Sra. de Lourdes"                                                             => "#11-02", | 
| 2206 |  |  |  |  |  |  | "Dia Estadual do Ministério Público (SP)"                                        => "#12-02", | 
| 2207 |  |  |  |  |  |  | "1ª Transmissão da TV em Cores (1972)"                                           => "#16-02", | 
| 2208 |  |  |  |  |  |  | "Dia do Esportista"                                                              => "#19-02", | 
| 2209 |  |  |  |  |  |  | "Data Festiva do Exército"                                                       => "#21-02", | 
| 2210 |  |  |  |  |  |  | "Dia Nacional do Rotary (Dia do Rotariano)"                                      => "#23-02", | 
| 2211 |  |  |  |  |  |  | "Promulgação da Primeira Constituição Republicana (1891)"                        => "#24-02", | 
| 2212 |  |  |  |  |  |  | "Criação do Ministério das Comunicações"                                         => "#25-02", | 
| 2213 |  |  |  |  |  |  | "Dia Nacional do Livro Didático"                                                 => "#27-02", | 
| 2214 |  |  |  |  |  |  | "Dia do Agente Fiscal da Receita Federal"                                        => "#27-02", | 
| 2215 |  |  |  |  |  |  | "Dia da Vindima"                                                                 => "#01-03", | 
| 2216 |  |  |  |  |  |  | "Fundação da Cidade do Rio de Janeiro (1565)"                                    => "#01-03", | 
| 2217 |  |  |  |  |  |  | "Dia Nacional do Turismo"                                                        => "#02-03", | 
| 2218 |  |  |  |  |  |  | "Dia do Meteorologista"                                                          => "#03-03", | 
| 2219 |  |  |  |  |  |  | "Dia do Filatelista Brasileiro"                                                  => "#05-03", | 
| 2220 |  |  |  |  |  |  | "Dia dos Fuzileiros Navais"                                                      => "#07-03", | 
| 2221 |  |  |  |  |  |  | "Dia Internacional da Mulher"                                                    => "#08-03", | 
| 2222 |  |  |  |  |  |  | "Dia do Telefone"                                                                => "#10-03", | 
| 2223 |  |  |  |  |  |  | "São Domingos Sávio"                                                             => "#10-03", | 
| 2224 |  |  |  |  |  |  | "Dia do Bibliotecário"                                                           => "#12-03", | 
| 2225 |  |  |  |  |  |  | "Fundação da Cidade de Recife (1537)"                                            => "#12-03", | 
| 2226 |  |  |  |  |  |  | "Semana Nacional da Biblioteca"                                                  => "#12-03", | 
| 2227 |  |  |  |  |  |  | "Dia Nacional da Poesia"                                                         => "#14-03", | 
| 2228 |  |  |  |  |  |  | "Dia do Agente Autônomo de Investimentos"                                        => "#14-03", | 
| 2229 |  |  |  |  |  |  | "Dia do Conservador"                                                             => "#14-03", | 
| 2230 |  |  |  |  |  |  | "Dia do Vendedor de Livros"                                                      => "#14-03", | 
| 2231 |  |  |  |  |  |  | "Dia Mundial do Consumidor"                                                      => "#15-03", | 
| 2232 |  |  |  |  |  |  | "Dia da Constituição"                                                            => "#15-03", | 
| 2233 |  |  |  |  |  |  | "Dia do Carpinteiro"                                                             => "#19-03", | 
| 2234 |  |  |  |  |  |  | "Dia do Consertador"                                                             => "#19-03", | 
| 2235 |  |  |  |  |  |  | "Dia do Marceneiro"                                                              => "#19-03", | 
| 2236 |  |  |  |  |  |  | "São José (Padroeiro da Igreja Universal)"                                       => "#19-03", | 
| 2237 |  |  |  |  |  |  | "Dia Internacional para a Eliminação da Discriminação Racial"                    => "#21-03", | 
| 2238 |  |  |  |  |  |  | "Dia Universal do Teatro"                                                        => "#21-03", | 
| 2239 |  |  |  |  |  |  | "Dia Internacional da Floresta"                                                  => "#21-03", | 
| 2240 |  |  |  |  |  |  | "Dia Mundial do Meteorológico"                                                   => "#23-03", | 
| 2241 |  |  |  |  |  |  | "Dia do Cacau"                                                                   => "#26-03", | 
| 2242 |  |  |  |  |  |  | "Dia do Circo"                                                                   => "#27-03", | 
| 2243 |  |  |  |  |  |  | "Dia do Diagramador"                                                             => "#28-03", | 
| 2244 |  |  |  |  |  |  | "Dia do Revisor"                                                                 => "#28-03", | 
| 2245 |  |  |  |  |  |  | "Aniversário do Golpe Militar (1964)"                                            => "#31-03", | 
| 2246 |  |  |  |  |  |  | "Dia da Integração Nacional"                                                     => "#31-03", | 
| 2247 |  |  |  |  |  |  | "Dia da Mentira"                                                                 => "#01-04", | 
| 2248 |  |  |  |  |  |  | "Dia do Humanismo"                                                               => "#01-04", | 
| 2249 |  |  |  |  |  |  | "Dia do Propagandista"                                                           => "#02-04", | 
| 2250 |  |  |  |  |  |  | "São Francisco de Paula"                                                         => "#02-04", | 
| 2251 |  |  |  |  |  |  | "Dia Nacional do Parkinsoniano"                                                  => "#04-04", | 
| 2252 |  |  |  |  |  |  | "Dia do Corretor"                                                                => "#07-04", | 
| 2253 |  |  |  |  |  |  | "Dia do Médico Legista"                                                          => "#07-04", | 
| 2254 |  |  |  |  |  |  | "Dia Mundial do Combate ao Câncer"                                               => "#08-04", | 
| 2255 |  |  |  |  |  |  | "Dia da Natação"                                                                 => "#08-04", | 
| 2256 |  |  |  |  |  |  | "Dia Nacional do Aço"                                                            => "#09-04", | 
| 2257 |  |  |  |  |  |  | "Endoenças"                                                                      => "#09-04", | 
| 2258 |  |  |  |  |  |  | "Dia da Engenharia do Exército Brasileiro"                                       => "#10-04", | 
| 2259 |  |  |  |  |  |  | "Fundação do Exército da Salvação"                                               => "#10-04", | 
| 2260 |  |  |  |  |  |  | "Aniversário da Organização Internacional do Trabalho"                           => "#11-04", | 
| 2261 |  |  |  |  |  |  | "Dia da Intendência do Exército Brasileiro"                                      => "#12-04", | 
| 2262 |  |  |  |  |  |  | "Dia do Obstetra / da Obstetriz"                                                 => "#12-04", | 
| 2263 |  |  |  |  |  |  | "Aniversario da Loteria Esportiva (1970)"                                        => "#13-04", | 
| 2264 |  |  |  |  |  |  | "Dia do Office-Boy"                                                              => "#13-04", | 
| 2265 |  |  |  |  |  |  | "Dia Pan-Americano"                                                              => "#14-04", | 
| 2266 |  |  |  |  |  |  | "Dia da América"                                                                 => "#14-04", | 
| 2267 |  |  |  |  |  |  | "Dia Mundial do Desenhista"                                                      => "#15-04", | 
| 2268 |  |  |  |  |  |  | "Dia da Conservação do Solo"                                                     => "#15-04", | 
| 2269 |  |  |  |  |  |  | "Dia da Convenção do Solo"                                                       => "#15-04", | 
| 2270 |  |  |  |  |  |  | "Dia do Desarmamento Infantil"                                                   => "#15-04", | 
| 2271 |  |  |  |  |  |  | "Nascimento de Monteiro Lobato (Taubaté-SP)"                                     => "#18-04", | 
| 2272 |  |  |  |  |  |  | "Dia do Índio"                                                                   => "#19-04", | 
| 2273 |  |  |  |  |  |  | "Santo Expedito"                                                                 => "#19-04", | 
| 2274 |  |  |  |  |  |  | "Dia do Diplomata"                                                               => "#20-04", | 
| 2275 |  |  |  |  |  |  | "Dia da Latinidade"                                                              => "#21-04", | 
| 2276 |  |  |  |  |  |  | "Dia da Polícia Civil"                                                           => "#21-04", | 
| 2277 |  |  |  |  |  |  | "Dia Internacional da Terra"                                                     => "#21-04", | 
| 2278 |  |  |  |  |  |  | "Dia do Metalúrgico"                                                             => "#21-04", | 
| 2279 |  |  |  |  |  |  | "Fundação da Cidade de Brasília-DF (1960)"                                       => "#21-04", | 
| 2280 |  |  |  |  |  |  | "Morre Tancredo de Almeida Neves (1985)"                                         => "#21-04", | 
| 2281 |  |  |  |  |  |  | "Descobrimento do Brasil (1500)"                                                 => "#22-04", | 
| 2282 |  |  |  |  |  |  | "Dia Mundial da Terra"                                                           => "#22-04", | 
| 2283 |  |  |  |  |  |  | "Dia da Aviação de Caça"                                                         => "#22-04", | 
| 2284 |  |  |  |  |  |  | "Dia da Comunidade Luso-Brasileira"                                              => "#22-04", | 
| 2285 |  |  |  |  |  |  | "Dia da Força Aérea Brasileira"                                                  => "#22-04", | 
| 2286 |  |  |  |  |  |  | "Dia do Planeta Terra"                                                           => "#22-04", | 
| 2287 |  |  |  |  |  |  | "Dia Mundial do Escoteiro (Baden Powell Day)"                                    => "#23-04", | 
| 2288 |  |  |  |  |  |  | "Dia Mundial do Livro e do Direito Autoral"                                      => "#23-04", | 
| 2289 |  |  |  |  |  |  | "São Jorge"                                                                      => "#23-04", | 
| 2290 |  |  |  |  |  |  | "Dia do Agente de Viagem"                                                        => "#24-04", | 
| 2291 |  |  |  |  |  |  | "Dia do Contabilista"                                                            => "#25-04", | 
| 2292 |  |  |  |  |  |  | "São Marcos"                                                                     => "#25-04", | 
| 2293 |  |  |  |  |  |  | "Celebração da Primeira Missa no Brasil"                                         => "#26-04", | 
| 2294 |  |  |  |  |  |  | "Dia do Goleiro"                                                                 => "#26-04", | 
| 2295 |  |  |  |  |  |  | "Dia Nacional da Empregada Doméstica"                                            => "#27-04", | 
| 2296 |  |  |  |  |  |  | "Dia do Sacerdote"                                                               => "#27-04", | 
| 2297 |  |  |  |  |  |  | "Santa Zita"                                                                     => "#27-04", | 
| 2298 |  |  |  |  |  |  | "Dia da Educação"                                                                => "#28-04", | 
| 2299 |  |  |  |  |  |  | "Dia da Sogra"                                                                   => "#28-04", | 
| 2300 |  |  |  |  |  |  | "Dia Nacional da Mulher"                                                         => "#30-04", | 
| 2301 |  |  |  |  |  |  | "Dia da OEA (Organização dos Estados Americanos)"                                => "#30-04", | 
| 2302 |  |  |  |  |  |  | "Dia do Ferroviário"                                                             => "#30-04", | 
| 2303 |  |  |  |  |  |  | "Inauguração da Primeira Estrada de Ferro no Brasil"                             => "#30-04", | 
| 2304 |  |  |  |  |  |  | "Dia da Literatura Brasileira"                                                   => "#01-05", | 
| 2305 |  |  |  |  |  |  | "São José Operário"                                                              => "#01-05", | 
| 2306 |  |  |  |  |  |  | "Dia Nacional do Ex-Combatente"                                                  => "#02-05", | 
| 2307 |  |  |  |  |  |  | "Dia do Sertanejo"                                                               => "#03-05", | 
| 2308 |  |  |  |  |  |  | "Dia do Taquigrafo"                                                              => "#03-05", | 
| 2309 |  |  |  |  |  |  | "São Tiago"                                                                      => "#03-05", | 
| 2310 |  |  |  |  |  |  | "Dia Nacional das Comunicações"                                                  => "#05-05", | 
| 2311 |  |  |  |  |  |  | "Dia Nacional do Expedicionário"                                                 => "#05-05", | 
| 2312 |  |  |  |  |  |  | "Dia da Comunidade"                                                              => "#05-05", | 
| 2313 |  |  |  |  |  |  | "Dia das Comunicações"                                                           => "#05-05", | 
| 2314 |  |  |  |  |  |  | "Dia de Rondon"                                                                  => "#05-05", | 
| 2315 |  |  |  |  |  |  | "Dia do Pintor"                                                                  => "#05-05", | 
| 2316 |  |  |  |  |  |  | "Dia do Trabalhador Preso"                                                       => "#05-05", | 
| 2317 |  |  |  |  |  |  | "Dia do Cartógrafo"                                                              => "#06-05", | 
| 2318 |  |  |  |  |  |  | "Dia do Oftalmologista"                                                          => "#07-05", | 
| 2319 |  |  |  |  |  |  | "Dia do Silêncio"                                                                => "#07-05", | 
| 2320 |  |  |  |  |  |  | "Dia Internacional da Cruz Vermelha"                                             => "#08-05", | 
| 2321 |  |  |  |  |  |  | "Dia da Vitória (1945)"                                                          => "#08-05", | 
| 2322 |  |  |  |  |  |  | "Dia do Artista Plástico"                                                        => "#08-05", | 
| 2323 |  |  |  |  |  |  | "São Vitor"                                                                      => "#08-05", | 
| 2324 |  |  |  |  |  |  | "Término da II Guerra Mundial (1945)"                                            => "#08-05", | 
| 2325 |  |  |  |  |  |  | "Dia da Cavalaria"                                                               => "#10-05", | 
| 2326 |  |  |  |  |  |  | "Dia do Campo"                                                                   => "#10-05", | 
| 2327 |  |  |  |  |  |  | "Dia do Guia de Turismo"                                                         => "#10-05", | 
| 2328 |  |  |  |  |  |  | "Dia da Integração do Telégrafo no Brasil"                                       => "#11-05", | 
| 2329 |  |  |  |  |  |  | "Dia Mundial da Enfermeira"                                                      => "#12-05", | 
| 2330 |  |  |  |  |  |  | "São Pancrácio"                                                                  => "#12-05", | 
| 2331 |  |  |  |  |  |  | "Abolição da Escravatura, Lei Áurea (1888)"                                      => "#13-05", | 
| 2332 |  |  |  |  |  |  | "Criação da Biblioteca Nacional, Rio de Janeiro-RJ (1811)"                       => "#13-05", | 
| 2333 |  |  |  |  |  |  | "Dia da Estrada de Rodagem"                                                      => "#13-05", | 
| 2334 |  |  |  |  |  |  | "Dia da Fraternidade Brasileira"                                                 => "#13-05", | 
| 2335 |  |  |  |  |  |  | "Dia do Automóvel"                                                               => "#13-05", | 
| 2336 |  |  |  |  |  |  | "N. Sra. de Fátima"                                                              => "#13-05", | 
| 2337 |  |  |  |  |  |  | "Dia Continental do Seguro"                                                      => "#14-05", | 
| 2338 |  |  |  |  |  |  | "São Matias"                                                                     => "#14-05", | 
| 2339 |  |  |  |  |  |  | "Dia do Assistente Social"                                                       => "#15-05", | 
| 2340 |  |  |  |  |  |  | "Dia do Gerente Bancário"                                                        => "#15-05", | 
| 2341 |  |  |  |  |  |  | "Dia do Gari"                                                                    => "#16-05", | 
| 2342 |  |  |  |  |  |  | "Dia Internacional da Comunicação e Telecomunicação"                             => "#17-05", | 
| 2343 |  |  |  |  |  |  | "Dia Internacional da Comunicação Social"                                        => "#18-05", | 
| 2344 |  |  |  |  |  |  | "Dia Internacional dos Museus"                                                   => "#18-05", | 
| 2345 |  |  |  |  |  |  | "Dia dos Vidreiros"                                                              => "#18-05", | 
| 2346 |  |  |  |  |  |  | "Dia do Comissário de Menores"                                                   => "#20-05", | 
| 2347 |  |  |  |  |  |  | "Dia da Língua Nacional"                                                         => "#21-05", | 
| 2348 |  |  |  |  |  |  | "Dia do Apicultor"                                                               => "#22-05", | 
| 2349 |  |  |  |  |  |  | "Santa Rita"                                                                     => "#22-05", | 
| 2350 |  |  |  |  |  |  | "Dia da Infantaria"                                                              => "#24-05", | 
| 2351 |  |  |  |  |  |  | "Dia do Datilógrafo"                                                             => "#24-05", | 
| 2352 |  |  |  |  |  |  | "Dia do Detento"                                                                 => "#24-05", | 
| 2353 |  |  |  |  |  |  | "Dia do Telegrafista"                                                            => "#24-05", | 
| 2354 |  |  |  |  |  |  | "Dia do Vestibulando"                                                            => "#24-05", | 
| 2355 |  |  |  |  |  |  | "N. Sra. Auxiliadora"                                                            => "#24-05", | 
| 2356 |  |  |  |  |  |  | "Dia da Indústria"                                                               => "#25-05", | 
| 2357 |  |  |  |  |  |  | "Dia do Industrial"                                                              => "#25-05", | 
| 2358 |  |  |  |  |  |  | "Dia do Massagista"                                                              => "#25-05", | 
| 2359 |  |  |  |  |  |  | "Dia do Trabalhador Rural"                                                       => "#25-05", | 
| 2360 |  |  |  |  |  |  | "Dia Nacional da Mata Atlântica"                                                 => "#27-05", | 
| 2361 |  |  |  |  |  |  | "Dia do Profissional Liberal"                                                    => "#27-05", | 
| 2362 |  |  |  |  |  |  | "Dia do Estatístico"                                                             => "#29-05", | 
| 2363 |  |  |  |  |  |  | "Dia do Geógrafo"                                                                => "#29-05", | 
| 2364 |  |  |  |  |  |  | "Dia do Geólogo"                                                                 => "#30-05", | 
| 2365 |  |  |  |  |  |  | "Santa Joana d'Arc"                                                              => "#30-05", | 
| 2366 |  |  |  |  |  |  | "Dia Mundial das Comunicações Sociais"                                           => "#31-05", | 
| 2367 |  |  |  |  |  |  | "Dia do Espírito Santo"                                                          => "#31-05", | 
| 2368 |  |  |  |  |  |  | "Primeira Transmissão de TV no Brasil (1950)"                                    => "#01-06", | 
| 2369 |  |  |  |  |  |  | "Dia do Duque de Caxias"                                                         => "#01-06", | 
| 2370 |  |  |  |  |  |  | "Dia Mundial do Administrador de Pessoal"                                        => "#03-06", | 
| 2371 |  |  |  |  |  |  | "Dia Mundial do Meio Ambiente"                                                   => "#05-06", | 
| 2372 |  |  |  |  |  |  | "Dia da Ecologia"                                                                => "#05-06", | 
| 2373 |  |  |  |  |  |  | "Dia do Citricultor"                                                             => "#08-06", | 
| 2374 |  |  |  |  |  |  | "Dia Nacional da Imunização"                                                     => "#09-06", | 
| 2375 |  |  |  |  |  |  | "Dia Nacional do Pe. Anchieta"                                                   => "#09-06", | 
| 2376 |  |  |  |  |  |  | "Dia do Porteiro"                                                                => "#09-06", | 
| 2377 |  |  |  |  |  |  | "Dia do Tênis e do Tenista"                                                      => "#09-06", | 
| 2378 |  |  |  |  |  |  | "Dia da Artilharia"                                                              => "#10-06", | 
| 2379 |  |  |  |  |  |  | "Dia da Língua Portuguesa"                                                       => "#10-06", | 
| 2380 |  |  |  |  |  |  | "Dia da Raça"                                                                    => "#10-06", | 
| 2381 |  |  |  |  |  |  | "Batalha Naval do Riachuelo"                                                     => "#11-06", | 
| 2382 |  |  |  |  |  |  | "Dia da Marinha Brasileira"                                                      => "#11-06", | 
| 2383 |  |  |  |  |  |  | "Dia do Educador Sanitário"                                                      => "#11-06", | 
| 2384 |  |  |  |  |  |  | "Dia dos Namorados"                                                              => "#12-06", | 
| 2385 |  |  |  |  |  |  | "Criado o Jardim Botânico do Rio de Janeiro por D. João VI"                      => "#13-06", | 
| 2386 |  |  |  |  |  |  | "Dia do Turista"                                                                 => "#13-06", | 
| 2387 |  |  |  |  |  |  | "Santo Antônio"                                                                  => "#13-06", | 
| 2388 |  |  |  |  |  |  | "Dia Universal de Deus"                                                          => "#14-06", | 
| 2389 |  |  |  |  |  |  | "Dia do Solista"                                                                 => "#14-06", | 
| 2390 |  |  |  |  |  |  | "São Vito"                                                                       => "#15-06", | 
| 2391 |  |  |  |  |  |  | "Dia da Unidade Nacional"                                                        => "#16-06", | 
| 2392 |  |  |  |  |  |  | "Dia da Imigração Japonesa"                                                      => "#18-06", | 
| 2393 |  |  |  |  |  |  | "Dia do Químico"                                                                 => "#18-06", | 
| 2394 |  |  |  |  |  |  | "Dia do Revendedor"                                                              => "#20-06", | 
| 2395 |  |  |  |  |  |  | "Dia Nacional do Luto"                                                           => "#21-06", | 
| 2396 |  |  |  |  |  |  | "Dia Universal Olímpico"                                                         => "#21-06", | 
| 2397 |  |  |  |  |  |  | "Dia da Mídia"                                                                   => "#21-06", | 
| 2398 |  |  |  |  |  |  | "Dia do Mel"                                                                     => "#21-06", | 
| 2399 |  |  |  |  |  |  | "Dia do Migrante"                                                                => "#21-06", | 
| 2400 |  |  |  |  |  |  | "Nascimento de Machado de Assis, Rio de Janeiro-RJ (1839)"                       => "#21-06", | 
| 2401 |  |  |  |  |  |  | "Sagrado Coração de Jesus"                                                       => "#22-06", | 
| 2402 |  |  |  |  |  |  | "Imaculado Coração de Maria"                                                     => "#23-06", | 
| 2403 |  |  |  |  |  |  | "Dia Internacional do Leite"                                                     => "#24-06", | 
| 2404 |  |  |  |  |  |  | "Dia da Comunidade Britânica"                                                    => "#24-06", | 
| 2405 |  |  |  |  |  |  | "Dia das Empresas Gráficas"                                                      => "#24-06", | 
| 2406 |  |  |  |  |  |  | "Dia do Caboclo"                                                                 => "#24-06", | 
| 2407 |  |  |  |  |  |  | "Festa Junina (Feriado Escolar)"                                                 => "#24-06", | 
| 2408 |  |  |  |  |  |  | "São João Batista"                                                               => "#24-06", | 
| 2409 |  |  |  |  |  |  | "Dia do Quilo"                                                                   => "#25-06", | 
| 2410 |  |  |  |  |  |  | "Dia Nacional de Combate às Drogas"                                              => "#26-06", | 
| 2411 |  |  |  |  |  |  | "Dia Nacional do Progresso"                                                      => "#27-06", | 
| 2412 |  |  |  |  |  |  | "Dia da Revolução Espiritual"                                                    => "#27-06", | 
| 2413 |  |  |  |  |  |  | "Dia dos Artistas Líricos"                                                       => "#27-06", | 
| 2414 |  |  |  |  |  |  | "Dia da Renovação Espiritual"                                                    => "#28-06", | 
| 2415 |  |  |  |  |  |  | "Dia Internacional do Orgulho Gay"                                               => "#29-06", | 
| 2416 |  |  |  |  |  |  | "Dia da Telefonista"                                                             => "#29-06", | 
| 2417 |  |  |  |  |  |  | "Dia do Papa"                                                                    => "#29-06", | 
| 2418 |  |  |  |  |  |  | "Dia do Pescador"                                                                => "#29-06", | 
| 2419 |  |  |  |  |  |  | "São Pedro e São Paulo"                                                          => "#29-06", | 
| 2420 |  |  |  |  |  |  | "Dia do Economiário"                                                             => "#30-06", | 
| 2421 |  |  |  |  |  |  | "Dia da Vacina BCG"                                                              => "#01-07", | 
| 2422 |  |  |  |  |  |  | "Instituição do Real como Unidade Monetária (1994)"                              => "#01-07", | 
| 2423 |  |  |  |  |  |  | "Dia do Hospital"                                                                => "#02-07", | 
| 2424 |  |  |  |  |  |  | "São Tomé"                                                                       => "#03-07", | 
| 2425 |  |  |  |  |  |  | "Dia Internacional do Cooperativismo"                                            => "#04-07", | 
| 2426 |  |  |  |  |  |  | "Criação do IBGE (Instituto Brasileiro de Geografia e Estatística)"              => "#06-07", | 
| 2427 |  |  |  |  |  |  | "Santa Maria Goretti"                                                            => "#06-07", | 
| 2428 |  |  |  |  |  |  | "Dia do Panificador"                                                             => "#08-07", | 
| 2429 |  |  |  |  |  |  | "Dia do Soldado Constitucionalista"                                              => "#09-07", | 
| 2430 |  |  |  |  |  |  | "N. Sra. Mediugórie"                                                             => "#09-07", | 
| 2431 |  |  |  |  |  |  | "Promulgação da Constituição Republicana (1932)"                                 => "#09-07", | 
| 2432 |  |  |  |  |  |  | "Dia da Pizza em São Paulo"                                                      => "#10-07", | 
| 2433 |  |  |  |  |  |  | "Dia do Rondonista"                                                              => "#11-07", | 
| 2434 |  |  |  |  |  |  | "São Bento"                                                                      => "#11-07", | 
| 2435 |  |  |  |  |  |  | "Dia do Engenheiro Florestal"                                                    => "#12-07", | 
| 2436 |  |  |  |  |  |  | "Dia Mundial do Rock"                                                            => "#13-07", | 
| 2437 |  |  |  |  |  |  | "Dia do Engenheiro de Saneamento"                                                => "#13-07", | 
| 2438 |  |  |  |  |  |  | "Dia dos Cantores e Compositores Sertanejos"                                     => "#13-07", | 
| 2439 |  |  |  |  |  |  | "Dia do Propagandista de Laboratório"                                            => "#14-07", | 
| 2440 |  |  |  |  |  |  | "São Camilo de Lélis"                                                            => "#14-07", | 
| 2441 |  |  |  |  |  |  | "Dia Nacional dos Clubes"                                                        => "#15-07", | 
| 2442 |  |  |  |  |  |  | "Dia do Comerciante"                                                             => "#16-07", | 
| 2443 |  |  |  |  |  |  | "N. Sra. do Carmo"                                                               => "#16-07", | 
| 2444 |  |  |  |  |  |  | "Dia do Protetor de Florestas"                                                   => "#17-07", | 
| 2445 |  |  |  |  |  |  | "Dia da Coroação de D. Pedro"                                                    => "#18-07", | 
| 2446 |  |  |  |  |  |  | "Dia Nacional do Futebol"                                                        => "#19-07", | 
| 2447 |  |  |  |  |  |  | "Dia da Caridade"                                                                => "#19-07", | 
| 2448 |  |  |  |  |  |  | "Dia da Junta Comercial"                                                         => "#19-07", | 
| 2449 |  |  |  |  |  |  | "Dia Pan-Americano do Engenheiro"                                                => "#20-07", | 
| 2450 |  |  |  |  |  |  | "Dia do Revendedor (de Gasolina)"                                                => "#20-07", | 
| 2451 |  |  |  |  |  |  | "1ª Vez Que o Homem Pisou na Lua (1969)"                                         => "#21-07", | 
| 2452 |  |  |  |  |  |  | "Santa Madalena"                                                                 => "#22-07", | 
| 2453 |  |  |  |  |  |  | "Dia da Declaração da Maioridade de D. Pedro II (1840)"                          => "#23-07", | 
| 2454 |  |  |  |  |  |  | "Dia do Guarda Rodoviário"                                                       => "#23-07", | 
| 2455 |  |  |  |  |  |  | "Dia do Colono"                                                                  => "#25-07", | 
| 2456 |  |  |  |  |  |  | "Dia do Motorista"                                                               => "#25-07", | 
| 2457 |  |  |  |  |  |  | "São Cristóvão"                                                                  => "#25-07", | 
| 2458 |  |  |  |  |  |  | "Dia da Vovó"                                                                    => "#26-07", | 
| 2459 |  |  |  |  |  |  | "Santa Ana"                                                                      => "#26-07", | 
| 2460 |  |  |  |  |  |  | "São Joaquim"                                                                    => "#26-07", | 
| 2461 |  |  |  |  |  |  | "Dia Nacional de Prevenção de Acidentes de Trabalho"                             => "#27-07", | 
| 2462 |  |  |  |  |  |  | "Dia do Motociclista"                                                            => "#27-07", | 
| 2463 |  |  |  |  |  |  | "Santa Marta"                                                                    => "#29-07", | 
| 2464 |  |  |  |  |  |  | "São Inácio de Loyola"                                                           => "#31-07", | 
| 2465 |  |  |  |  |  |  | "Dia Nacional do Sêlo"                                                           => "#01-08", | 
| 2466 |  |  |  |  |  |  | "Dia do Tintureiro"                                                              => "#03-08", | 
| 2467 |  |  |  |  |  |  | "São João Maria Vianei"                                                          => "#04-08", | 
| 2468 |  |  |  |  |  |  | "N. Sra. das Neves"                                                              => "#05-08", | 
| 2469 |  |  |  |  |  |  | "Bom Jesus"                                                                      => "#06-08", | 
| 2470 |  |  |  |  |  |  | "São Caetano"                                                                    => "#07-08", | 
| 2471 |  |  |  |  |  |  | "Dia do Padre"                                                                   => "#08-08", | 
| 2472 |  |  |  |  |  |  | "São Lourenço"                                                                   => "#10-08", | 
| 2473 |  |  |  |  |  |  | "Dia Internacional da Logosofia"                                                 => "#11-08", | 
| 2474 |  |  |  |  |  |  | "Dia da Consciência Nacional"                                                    => "#11-08", | 
| 2475 |  |  |  |  |  |  | "Dia da Pintura"                                                                 => "#11-08", | 
| 2476 |  |  |  |  |  |  | "Dia do Advogado"                                                                => "#11-08", | 
| 2477 |  |  |  |  |  |  | "Dia do Direito"                                                                 => "#11-08", | 
| 2478 |  |  |  |  |  |  | "Dia do Garçom"                                                                  => "#11-08", | 
| 2479 |  |  |  |  |  |  | "Dia do Magistrado"                                                              => "#11-08", | 
| 2480 |  |  |  |  |  |  | "Dia Nacional das Artes"                                                         => "#12-08", | 
| 2481 |  |  |  |  |  |  | "N. Sra. das Cabeças"                                                            => "#12-08", | 
| 2482 |  |  |  |  |  |  | "Dia do Economista"                                                              => "#13-08", | 
| 2483 |  |  |  |  |  |  | "Dia do Encarcerado"                                                             => "#13-08", | 
| 2484 |  |  |  |  |  |  | "Dia da Unidade Humana"                                                          => "#14-08", | 
| 2485 |  |  |  |  |  |  | "Assunção de Nossa Senhora"                                                      => "#15-08", | 
| 2486 |  |  |  |  |  |  | "Dia da Informática"                                                             => "#15-08", | 
| 2487 |  |  |  |  |  |  | "Dia dos Solteiros"                                                              => "#15-08", | 
| 2488 |  |  |  |  |  |  | "N. Sra. da Glória"                                                              => "#15-08", | 
| 2489 |  |  |  |  |  |  | "São Roque"                                                                      => "#16-08", | 
| 2490 |  |  |  |  |  |  | "Criação do Instituto Histórico e Geográfico, Rio de Janeiro-RJ (1838)"          => "#18-08", | 
| 2491 |  |  |  |  |  |  | "Santa Helena"                                                                   => "#18-08", | 
| 2492 |  |  |  |  |  |  | "Dia Mundial da Fotografia"                                                      => "#19-08", | 
| 2493 |  |  |  |  |  |  | "Dia do Artista de Teatro"                                                       => "#19-08", | 
| 2494 |  |  |  |  |  |  | "Dia do Maçom"                                                                   => "#20-08", | 
| 2495 |  |  |  |  |  |  | "Dia do Excepcional"                                                             => "#22-08", | 
| 2496 |  |  |  |  |  |  | "Dia Internacional em Memória da Escravidão e da Abolição"                       => "#23-08", | 
| 2497 |  |  |  |  |  |  | "Dia da Injustiça"                                                               => "#23-08", | 
| 2498 |  |  |  |  |  |  | "Santa Rosa de Lima"                                                             => "#23-08", | 
| 2499 |  |  |  |  |  |  | "São Bartolomeu"                                                                 => "#24-08", | 
| 2500 |  |  |  |  |  |  | "Dia do Exército Brasileiro"                                                     => "#25-08", | 
| 2501 |  |  |  |  |  |  | "Dia do Feirante"                                                                => "#25-08", | 
| 2502 |  |  |  |  |  |  | "Dia do Soldado"                                                                 => "#25-08", | 
| 2503 |  |  |  |  |  |  | "Dia Nacional do Psicólogo"                                                      => "#27-08", | 
| 2504 |  |  |  |  |  |  | "Dia do Corretor de Imóveis"                                                     => "#27-08", | 
| 2505 |  |  |  |  |  |  | "Santa Mônica"                                                                   => "#27-08", | 
| 2506 |  |  |  |  |  |  | "Dia Nacional dos Bancários"                                                     => "#28-08", | 
| 2507 |  |  |  |  |  |  | "Dia da Avicultura"                                                              => "#28-08", | 
| 2508 |  |  |  |  |  |  | "Santo Agostinho"                                                                => "#28-08", | 
| 2509 |  |  |  |  |  |  | "Dia do Nutricionista"                                                           => "#31-08", | 
| 2510 |  |  |  |  |  |  | "São Raimundo Nonato"                                                            => "#31-08", | 
| 2511 |  |  |  |  |  |  | "Dia do Biólogo"                                                                 => "#03-09", | 
| 2512 |  |  |  |  |  |  | "Dia da Amazônia"                                                                => "#05-09", | 
| 2513 |  |  |  |  |  |  | "Dia do Oficial de Farmácia"                                                     => "#05-09", | 
| 2514 |  |  |  |  |  |  | "Dia do Alfaiate"                                                                => "#06-09", | 
| 2515 |  |  |  |  |  |  | "Natividade de Nossa Senhora"                                                    => "#08-09", | 
| 2516 |  |  |  |  |  |  | "Dia do Administrador"                                                           => "#09-09", | 
| 2517 |  |  |  |  |  |  | "Dia do Veterinário"                                                             => "#09-09", | 
| 2518 |  |  |  |  |  |  | "Dia da Cruz"                                                                    => "#14-09", | 
| 2519 |  |  |  |  |  |  | "Dia do Frevo"                                                                   => "#14-09", | 
| 2520 |  |  |  |  |  |  | "N. Sra. das Dores"                                                              => "#15-09", | 
| 2521 |  |  |  |  |  |  | "São Cipriano"                                                                   => "#16-09", | 
| 2522 |  |  |  |  |  |  | "Dia da Compreensão Mundial"                                                     => "#17-09", | 
| 2523 |  |  |  |  |  |  | "Promulgação da Constituição do Brasil (1946)"                                   => "#18-09", | 
| 2524 |  |  |  |  |  |  | "Dia do Teatro"                                                                  => "#19-09", | 
| 2525 |  |  |  |  |  |  | "São Genaro"                                                                     => "#19-09", | 
| 2526 |  |  |  |  |  |  | "Dia do Funcionário Municipal"                                                   => "#20-09", | 
| 2527 |  |  |  |  |  |  | "Dia do Gaúcho"                                                                  => "#20-09", | 
| 2528 |  |  |  |  |  |  | "Dia do Policial Civil"                                                          => "#20-09", | 
| 2529 |  |  |  |  |  |  | "Dia Nacional da Radiodifusão"                                                   => "#21-09", | 
| 2530 |  |  |  |  |  |  | "Dia da Árvore"                                                                  => "#21-09", | 
| 2531 |  |  |  |  |  |  | "Dia do Fazendeiro"                                                              => "#21-09", | 
| 2532 |  |  |  |  |  |  | "Dia do Radialista"                                                              => "#21-09", | 
| 2533 |  |  |  |  |  |  | "Dia do Radio"                                                                   => "#21-09", | 
| 2534 |  |  |  |  |  |  | "Santa Efigênia"                                                                 => "#21-09", | 
| 2535 |  |  |  |  |  |  | "São Mateus"                                                                     => "#21-09", | 
| 2536 |  |  |  |  |  |  | "Dia do Soldador"                                                                => "#23-09", | 
| 2537 |  |  |  |  |  |  | "Dia Interamericano/Internacional de Relações Públicas"                          => "#26-09", | 
| 2538 |  |  |  |  |  |  | "Dia Mundial do Turismo"                                                         => "#27-09", | 
| 2539 |  |  |  |  |  |  | "Dia do Ancião"                                                                  => "#27-09", | 
| 2540 |  |  |  |  |  |  | "Dia do Encanador"                                                               => "#27-09", | 
| 2541 |  |  |  |  |  |  | "São Cosme e Damião"                                                             => "#27-09", | 
| 2542 |  |  |  |  |  |  | "São Vicente de Paulo"                                                           => "#27-09", | 
| 2543 |  |  |  |  |  |  | "Dia da Lei do Sexagenário"                                                      => "#28-09", | 
| 2544 |  |  |  |  |  |  | "Dia da Mãe Preta"                                                               => "#28-09", | 
| 2545 |  |  |  |  |  |  | "Lei do Ventre Livre Sancionada pela Princesa Isabel (1871)"                     => "#28-09", | 
| 2546 |  |  |  |  |  |  | "Dia do Anunciante"                                                              => "#29-09", | 
| 2547 |  |  |  |  |  |  | "Dia do Professor de Educação Física"                                            => "#29-09", | 
| 2548 |  |  |  |  |  |  | "Santos Arcanjos"                                                                => "#29-09", | 
| 2549 |  |  |  |  |  |  | "São Gabriel"                                                                    => "#29-09", | 
| 2550 |  |  |  |  |  |  | "São Miguel"                                                                     => "#29-09", | 
| 2551 |  |  |  |  |  |  | "Dia Internacional da Navegação"                                                 => "#30-09", | 
| 2552 |  |  |  |  |  |  | "Dia Mundial do Tradutor"                                                        => "#30-09", | 
| 2553 |  |  |  |  |  |  | "Dia da Secretária"                                                              => "#30-09", | 
| 2554 |  |  |  |  |  |  | "São Jerônimo"                                                                   => "#30-09", | 
| 2555 |  |  |  |  |  |  | "Dia Nacional do Vereador"                                                       => "#01-10", | 
| 2556 |  |  |  |  |  |  | "Dia Pan-Americano do Vendedor"                                                  => "#01-10", | 
| 2557 |  |  |  |  |  |  | "Dia do Representante Comercial"                                                 => "#01-10", | 
| 2558 |  |  |  |  |  |  | "Dia da Esquadra"                                                                => "#01-10", | 
| 2559 |  |  |  |  |  |  | "Dia do Anjo da Guarda"                                                          => "#02-10", | 
| 2560 |  |  |  |  |  |  | "Dia das Abelhas"                                                                => "#03-10", | 
| 2561 |  |  |  |  |  |  | "Dia Mundial do Dentista"                                                        => "#03-10", | 
| 2562 |  |  |  |  |  |  | "Dia do Latino-Americano"                                                        => "#03-10", | 
| 2563 |  |  |  |  |  |  | "Dia Internacioanl dos Animais"                                                  => "#03-10", | 
| 2564 |  |  |  |  |  |  | "Dia da Ave"                                                                     => "#04-10", | 
| 2565 |  |  |  |  |  |  | "Dia da Natureza"                                                                => "#04-10", | 
| 2566 |  |  |  |  |  |  | "Dia do Barman"                                                                  => "#04-10", | 
| 2567 |  |  |  |  |  |  | "Dia do Cão"                                                                     => "#04-10", | 
| 2568 |  |  |  |  |  |  | "Dia do Poeta"                                                                   => "#04-10", | 
| 2569 |  |  |  |  |  |  | "Dia do Radio Interamericano"                                                    => "#04-10", | 
| 2570 |  |  |  |  |  |  | "São Francisco de Assis"                                                         => "#04-10", | 
| 2571 |  |  |  |  |  |  | "Dia Internacional da Ecologia"                                                  => "#04-10", | 
| 2572 |  |  |  |  |  |  | "Dia Mundial dos Animais"                                                        => "#05-10", | 
| 2573 |  |  |  |  |  |  | "Dia das Aves"                                                                   => "#05-10", | 
| 2574 |  |  |  |  |  |  | "Promulgação da Nova Constituição do Brasil (1988)"                              => "#05-10", | 
| 2575 |  |  |  |  |  |  | "São Benedito"                                                                   => "#05-10", | 
| 2576 |  |  |  |  |  |  | "Dia do Compositor"                                                              => "#07-10", | 
| 2577 |  |  |  |  |  |  | "N. Sra. do Rosário"                                                             => "#07-10", | 
| 2578 |  |  |  |  |  |  | "Dia do Nordestino"                                                              => "#08-10", | 
| 2579 |  |  |  |  |  |  | "N. Sra. de Nazaré"                                                              => "#10-10", | 
| 2580 |  |  |  |  |  |  | "Dia do Deficiente Físico"                                                       => "#11-10", | 
| 2581 |  |  |  |  |  |  | "Dia do Teatro Municipal"                                                        => "#11-10", | 
| 2582 |  |  |  |  |  |  | "Descobrimento da América (1492)"                                                => "#12-10", | 
| 2583 |  |  |  |  |  |  | "Dia da Aclamação de D. Pedro I"                                                 => "#12-10", | 
| 2584 |  |  |  |  |  |  | "Dia da Cirurgia Infantil"                                                       => "#12-10", | 
| 2585 |  |  |  |  |  |  | "Dia do Mar"                                                                     => "#12-10", | 
| 2586 |  |  |  |  |  |  | "Inauguração do Cristo Redentor Rio de Janeiro-RJ"                               => "#12-10", | 
| 2587 |  |  |  |  |  |  | "Dia da Terapia Ocupacional"                                                     => "#13-10", | 
| 2588 |  |  |  |  |  |  | "Dia do Fisioterapeuta"                                                          => "#13-10", | 
| 2589 |  |  |  |  |  |  | "Dia Nacional da Pecuária"                                                       => "#14-10", | 
| 2590 |  |  |  |  |  |  | "Dia da Normalista"                                                              => "#15-10", | 
| 2591 |  |  |  |  |  |  | "Dia do Professor"                                                               => "#15-10", | 
| 2592 |  |  |  |  |  |  | "Dia Mundial da Alimentação"                                                     => "#16-10", | 
| 2593 |  |  |  |  |  |  | "Santa Edwirges (Endividados)"                                                   => "#16-10", | 
| 2594 |  |  |  |  |  |  | "Dia da Industria Aeronáutica Brasileira"                                        => "#17-10", | 
| 2595 |  |  |  |  |  |  | "Dia do Eletricista"                                                             => "#17-10", | 
| 2596 |  |  |  |  |  |  | "Dia do Estivador"                                                               => "#18-10", | 
| 2597 |  |  |  |  |  |  | "Dia do Médico"                                                                  => "#18-10", | 
| 2598 |  |  |  |  |  |  | "Dia do Pintor (de Parede, de Carro)"                                            => "#18-10", | 
| 2599 |  |  |  |  |  |  | "São Lucas (Médicos)"                                                            => "#18-10", | 
| 2600 |  |  |  |  |  |  | "Dia do Contato"                                                                 => "#21-10", | 
| 2601 |  |  |  |  |  |  | "Dia do MacKenzie"                                                               => "#21-10", | 
| 2602 |  |  |  |  |  |  | "Comemoração do 1º Vôo de Santos Dumont pilotando o 14 Bis (1906)"               => "#23-10", | 
| 2603 |  |  |  |  |  |  | "Dia da Aviação e do Aviador"                                                    => "#23-10", | 
| 2604 |  |  |  |  |  |  | "Dia Mundial do Desenvolvimento"                                                 => "#24-10", | 
| 2605 |  |  |  |  |  |  | "Dia da Democracia"                                                              => "#25-10", | 
| 2606 |  |  |  |  |  |  | "Dia das Missões"                                                                => "#25-10", | 
| 2607 |  |  |  |  |  |  | "Dia do Dentista Brasileiro"                                                     => "#25-10", | 
| 2608 |  |  |  |  |  |  | "Dia do Sapateiro"                                                               => "#25-10", | 
| 2609 |  |  |  |  |  |  | "Dia da Universidade Católica"                                                   => "#28-10", | 
| 2610 |  |  |  |  |  |  | "Dia do Funcionário Público"                                                     => "#28-10", | 
| 2611 |  |  |  |  |  |  | "São Judas Tadeu (Causas Impossíveis)"                                           => "#28-10", | 
| 2612 |  |  |  |  |  |  | "Dia da Decoração"                                                               => "#30-10", | 
| 2613 |  |  |  |  |  |  | "Dia do Balconista"                                                              => "#30-10", | 
| 2614 |  |  |  |  |  |  | "Dia do Comerciário"                                                             => "#30-10", | 
| 2615 |  |  |  |  |  |  | "São Geraldo"                                                                    => "#30-10", | 
| 2616 |  |  |  |  |  |  | "Dia Mundial da Poupança"                                                        => "#31-10", | 
| 2617 |  |  |  |  |  |  | "Todos os Santos"                                                                => "#01-11", | 
| 2618 |  |  |  |  |  |  | "São Lázaro"                                                                     => "#02-11", | 
| 2619 |  |  |  |  |  |  | "Dia do Cabeleireiro"                                                            => "#03-11", | 
| 2620 |  |  |  |  |  |  | "Dia do Inventor"                                                                => "#04-11", | 
| 2621 |  |  |  |  |  |  | "Dia Nacional da Cultura"                                                        => "#05-11", | 
| 2622 |  |  |  |  |  |  | "Dia da Ciência"                                                                 => "#05-11", | 
| 2623 |  |  |  |  |  |  | "Dia do Cinema Brasileiro"                                                       => "#05-11", | 
| 2624 |  |  |  |  |  |  | "Dia do Radio-Amador"                                                            => "#05-11", | 
| 2625 |  |  |  |  |  |  | "Dia do Técnico em Eletrônica"                                                   => "#05-11", | 
| 2626 |  |  |  |  |  |  | "Ação Católica"                                                                  => "#07-11", | 
| 2627 |  |  |  |  |  |  | "Dia Nacional dos Tribunais de Conta"                                            => "#07-11", | 
| 2628 |  |  |  |  |  |  | "Dia Mundial do Urbanismo"                                                       => "#08-11", | 
| 2629 |  |  |  |  |  |  | "Dia do Município"                                                               => "#09-11", | 
| 2630 |  |  |  |  |  |  | "Dia do Trigo"                                                                   => "#10-11", | 
| 2631 |  |  |  |  |  |  | "Dia do Soldado Desconhecido"                                                    => "#11-11", | 
| 2632 |  |  |  |  |  |  | "Dia do Supermercado"                                                            => "#12-11", | 
| 2633 |  |  |  |  |  |  | "Aniversário do Ministério da Educação"                                          => "#14-11", | 
| 2634 |  |  |  |  |  |  | "Dia Nacional da Alfabetização"                                                  => "#14-11", | 
| 2635 |  |  |  |  |  |  | "Dia do Esporte Amador"                                                          => "#15-11", | 
| 2636 |  |  |  |  |  |  | "Santos Roque Gonzalez e Companheiros"                                           => "#19-11", | 
| 2637 |  |  |  |  |  |  | "Dia Nacional da Consciência Negra"                                              => "#20-11", | 
| 2638 |  |  |  |  |  |  | "Dia do Datiloscopista Brasileiro"                                               => "#20-11", | 
| 2639 |  |  |  |  |  |  | "Dia da Homeopatia"                                                              => "#21-11", | 
| 2640 |  |  |  |  |  |  | "Dia das Saudações"                                                              => "#21-11", | 
| 2641 |  |  |  |  |  |  | "Dia da Solidariedade com o Povo Libanês"                                        => "#22-11", | 
| 2642 |  |  |  |  |  |  | "Santa Cecília"                                                                  => "#22-11", | 
| 2643 |  |  |  |  |  |  | "Dia Nacional do Doador de Sangue"                                               => "#25-11", | 
| 2644 |  |  |  |  |  |  | "Dia da Baiana do Acarajé"                                                       => "#25-11", | 
| 2645 |  |  |  |  |  |  | "Santa Catarina"                                                                 => "#26-11", | 
| 2646 |  |  |  |  |  |  | "N. Sra. das Graças"                                                             => "#27-11", | 
| 2647 |  |  |  |  |  |  | "Dia Mundial de Ação de Graças"                                                  => "#28-11", | 
| 2648 |  |  |  |  |  |  | "Santo André (Apóstolo)"                                                         => "#30-11", | 
| 2649 |  |  |  |  |  |  | "Dia Mundial de Prevenção contra AIDS"                                           => "#01-12", | 
| 2650 |  |  |  |  |  |  | "Dia do Imigrante"                                                               => "#01-12", | 
| 2651 |  |  |  |  |  |  | "Dia do Numismata"                                                               => "#01-12", | 
| 2652 |  |  |  |  |  |  | "Dia Nacional da Astronomia"                                                     => "#02-12", | 
| 2653 |  |  |  |  |  |  | "Dia Nacional das Relações Públicas"                                             => "#02-12", | 
| 2654 |  |  |  |  |  |  | "Dia Nacional do Samba"                                                          => "#02-12", | 
| 2655 |  |  |  |  |  |  | "São Francisco Xavier"                                                           => "#03-12", | 
| 2656 |  |  |  |  |  |  | "Dia Mundial da Propaganda"                                                      => "#04-12", | 
| 2657 |  |  |  |  |  |  | "Dia Nacional do Ministério Público"                                             => "#04-12", | 
| 2658 |  |  |  |  |  |  | "Dia do Orientador Educacional"                                                  => "#04-12", | 
| 2659 |  |  |  |  |  |  | "Dia do Podólogo"                                                                => "#04-12", | 
| 2660 |  |  |  |  |  |  | "Dia do Trabalhador em Minas de Carvão"                                          => "#04-12", | 
| 2661 |  |  |  |  |  |  | "Santa Bárbara"                                                                  => "#04-12", | 
| 2662 |  |  |  |  |  |  | "Dia da Fundação da Associação Comercial de São Paulo (1894)"                    => "#07-12", | 
| 2663 |  |  |  |  |  |  | "UNESCO Declara Brasília Patrimônio Cultural da Humanidade (1987)"               => "#07-12", | 
| 2664 |  |  |  |  |  |  | "Aniversário da Avenida Paulista São Paulo-SP (1891)"                            => "#08-12", | 
| 2665 |  |  |  |  |  |  | "Dia Nacional da Família"                                                        => "#08-12", | 
| 2666 |  |  |  |  |  |  | "Imaculada Conceição"                                                            => "#08-12", | 
| 2667 |  |  |  |  |  |  | "Dia da Justiça"                                                                 => "#08-12", | 
| 2668 |  |  |  |  |  |  | "Dia do Cronista Esportivo"                                                      => "#08-12", | 
| 2669 |  |  |  |  |  |  | "Dia da Criança Defeituosa"                                                      => "#09-12", | 
| 2670 |  |  |  |  |  |  | "Dia do Alcoólatra Recuperado"                                                   => "#09-12", | 
| 2671 |  |  |  |  |  |  | "Dia do Fonoáudiologo"                                                           => "#09-12", | 
| 2672 |  |  |  |  |  |  | "Declaração Universal dos Direitos Humanos"                                      => "#10-12", | 
| 2673 |  |  |  |  |  |  | "Dia do Palhaço"                                                                 => "#10-12", | 
| 2674 |  |  |  |  |  |  | "Dia do Arquiteto"                                                               => "#11-12", | 
| 2675 |  |  |  |  |  |  | "Dia do Engenheiro"                                                              => "#11-12", | 
| 2676 |  |  |  |  |  |  | "Dia do Tango"                                                                   => "#11-12", | 
| 2677 |  |  |  |  |  |  | "N. Sra. de Guadalupe"                                                           => "#12-12", | 
| 2678 |  |  |  |  |  |  | "Dia do Avaliador"                                                               => "#13-12", | 
| 2679 |  |  |  |  |  |  | "Dia do Cego"                                                                    => "#13-12", | 
| 2680 |  |  |  |  |  |  | "Dia do Marinheiro"                                                              => "#13-12", | 
| 2681 |  |  |  |  |  |  | "Dia do Ótico"                                                                   => "#13-12", | 
| 2682 |  |  |  |  |  |  | "Santa Luzia"                                                                    => "#13-12", | 
| 2683 |  |  |  |  |  |  | "Dia do Reservista"                                                              => "#16-12", | 
| 2684 |  |  |  |  |  |  | "Dia do Mecânico"                                                                => "#20-12", | 
| 2685 |  |  |  |  |  |  | "Dia do Vizinho"                                                                 => "#23-12", | 
| 2686 |  |  |  |  |  |  | "Dia do Órfão"                                                                   => "#24-12", | 
| 2687 |  |  |  |  |  |  | "Dia da Lembrança"                                                               => "#26-12", | 
| 2688 |  |  |  |  |  |  | "Santo Estevão"                                                                  => "#26-12", | 
| 2689 |  |  |  |  |  |  | "Festa da Sagrada Família"                                                       => "#27-12", | 
| 2690 |  |  |  |  |  |  | "Dia do Salva-Vidas"                                                             => "#28-12", | 
| 2691 |  |  |  |  |  |  | "São Silvestre (Reveillon)"                                                      => "#31-12" | 
| 2692 |  |  |  |  |  |  | }; | 
| 2693 |  |  |  |  |  |  |  | 
| 2694 |  |  |  |  |  |  | $Profiles->{'BR-AC'} = # Acre | 
| 2695 |  |  |  |  |  |  | { | 
| 2696 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2697 |  |  |  |  |  |  | }; | 
| 2698 |  |  |  |  |  |  | $Profiles->{'BR-AL'} = # Alagoas | 
| 2699 |  |  |  |  |  |  | { | 
| 2700 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2701 |  |  |  |  |  |  | }; | 
| 2702 |  |  |  |  |  |  | $Profiles->{'BR-AP'} = # Amapá | 
| 2703 |  |  |  |  |  |  | { | 
| 2704 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2705 |  |  |  |  |  |  | }; | 
| 2706 |  |  |  |  |  |  | $Profiles->{'BR-AM'} = # Amazonas | 
| 2707 |  |  |  |  |  |  | { | 
| 2708 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2709 |  |  |  |  |  |  | }; | 
| 2710 |  |  |  |  |  |  | $Profiles->{'BR-BA'} = # Bahia | 
| 2711 |  |  |  |  |  |  | { | 
| 2712 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2713 |  |  |  |  |  |  | }; | 
| 2714 |  |  |  |  |  |  | $Profiles->{'BR-CE'} = # Ceará | 
| 2715 |  |  |  |  |  |  | { | 
| 2716 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2717 |  |  |  |  |  |  | }; | 
| 2718 |  |  |  |  |  |  | $Profiles->{'BR-DF'} = # Distrito Federal | 
| 2719 |  |  |  |  |  |  | { | 
| 2720 |  |  |  |  |  |  | %{$Profiles->{'BR'}}, | 
| 2721 |  |  |  |  |  |  | "Fundação da Cidade de Brasília-DF (1960)"                                       => "#21-04"  # feriado em Brasília ? | 
| 2722 |  |  |  |  |  |  | }; | 
| 2723 |  |  |  |  |  |  | $Profiles->{'BR-ES'} = # Espírito Santo | 
| 2724 |  |  |  |  |  |  | { | 
| 2725 |  |  |  |  |  |  | %{$Profiles->{'BR'}}, | 
| 2726 |  |  |  |  |  |  | "N. Sra. da Penha"                                                               => "#24-04", # feriado em Vitória e Vila Velha | 
| 2727 |  |  |  |  |  |  | "Dia da Cidade de Vitória"                                                       => "#08-09", # feriado só em Vitória | 
| 2728 |  |  |  |  |  |  | "Dia da Colonização do Solo Espíritosantense"                                    => "#23-05"  # feriado só em Vila Velha | 
| 2729 |  |  |  |  |  |  | }; | 
| 2730 |  |  |  |  |  |  | $Profiles->{'BR-GO'} = # Goiás | 
| 2731 |  |  |  |  |  |  | { | 
| 2732 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2733 |  |  |  |  |  |  | }; | 
| 2734 |  |  |  |  |  |  | $Profiles->{'BR-MA'} = # Maranhão | 
| 2735 |  |  |  |  |  |  | { | 
| 2736 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2737 |  |  |  |  |  |  | }; | 
| 2738 |  |  |  |  |  |  | $Profiles->{'BR-MT'} = # Mato Grosso | 
| 2739 |  |  |  |  |  |  | { | 
| 2740 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2741 |  |  |  |  |  |  | }; | 
| 2742 |  |  |  |  |  |  | $Profiles->{'BR-MS'} = # Mato Grosso do Sul | 
| 2743 |  |  |  |  |  |  | { | 
| 2744 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2745 |  |  |  |  |  |  | }; | 
| 2746 |  |  |  |  |  |  | $Profiles->{'BR-MG'} = # Minas Gerais | 
| 2747 |  |  |  |  |  |  | { | 
| 2748 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2749 |  |  |  |  |  |  | }; | 
| 2750 |  |  |  |  |  |  | $Profiles->{'BR-PR'} = # Paraná | 
| 2751 |  |  |  |  |  |  | { | 
| 2752 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2753 |  |  |  |  |  |  | }; | 
| 2754 |  |  |  |  |  |  | $Profiles->{'BR-PB'} = # Paraíba | 
| 2755 |  |  |  |  |  |  | { | 
| 2756 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2757 |  |  |  |  |  |  | }; | 
| 2758 |  |  |  |  |  |  | $Profiles->{'BR-PA'} = # Pará | 
| 2759 |  |  |  |  |  |  | { | 
| 2760 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2761 |  |  |  |  |  |  | }; | 
| 2762 |  |  |  |  |  |  | $Profiles->{'BR-PE'} = # Pernambuco | 
| 2763 |  |  |  |  |  |  | { | 
| 2764 |  |  |  |  |  |  | %{$Profiles->{'BR'}}, | 
| 2765 |  |  |  |  |  |  | "Fundação da Cidade de Recife (1537)"                                            => "#12-03"  # feriado em Recife ? | 
| 2766 |  |  |  |  |  |  | }; | 
| 2767 |  |  |  |  |  |  | $Profiles->{'BR-PI'} = # Piauí | 
| 2768 |  |  |  |  |  |  | { | 
| 2769 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2770 |  |  |  |  |  |  | }; | 
| 2771 |  |  |  |  |  |  | $Profiles->{'BR-RN'} = # Rio Grande do Norte | 
| 2772 |  |  |  |  |  |  | { | 
| 2773 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2774 |  |  |  |  |  |  | }; | 
| 2775 |  |  |  |  |  |  | $Profiles->{'BR-RS'} = # Rio Grande do Sul | 
| 2776 |  |  |  |  |  |  | { | 
| 2777 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2778 |  |  |  |  |  |  | }; | 
| 2779 |  |  |  |  |  |  | $Profiles->{'BR-RJ'} = # Rio de Janeiro | 
| 2780 |  |  |  |  |  |  | { | 
| 2781 |  |  |  |  |  |  | %{$Profiles->{'BR'}}, | 
| 2782 |  |  |  |  |  |  | "São Sebastião (Padroeiro da Cidade do Rio de Janeiro)"                          => "#20-01", # feriado no Rio de Janeiro | 
| 2783 |  |  |  |  |  |  | "Fundação da Cidade do Rio de Janeiro (1565)"                                    => "#01-03"  # feriado no Rio de Janeiro | 
| 2784 |  |  |  |  |  |  | }; | 
| 2785 |  |  |  |  |  |  | $Profiles->{'BR-RO'} = # Rondônia | 
| 2786 |  |  |  |  |  |  | { | 
| 2787 |  |  |  |  |  |  | %{$Profiles->{'BR'}}, | 
| 2788 |  |  |  |  |  |  | "Dia da Criação do Estado de Rondônia-RO"                                        => "#04-01", # feriado ? | 
| 2789 |  |  |  |  |  |  | "Dia de Rondon"                                                                  => "#05-05", # feriado ? | 
| 2790 |  |  |  |  |  |  | "Dia do Rondonista"                                                              => "#11-07"  # feriado ? | 
| 2791 |  |  |  |  |  |  | }; | 
| 2792 |  |  |  |  |  |  | $Profiles->{'BR-RR'} = # Roraima | 
| 2793 |  |  |  |  |  |  | { | 
| 2794 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2795 |  |  |  |  |  |  | }; | 
| 2796 |  |  |  |  |  |  | $Profiles->{'BR-SC'} = # Santa Catarina | 
| 2797 |  |  |  |  |  |  | { | 
| 2798 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2799 |  |  |  |  |  |  | }; | 
| 2800 |  |  |  |  |  |  | $Profiles->{'BR-SE'} = # Sergipe | 
| 2801 |  |  |  |  |  |  | { | 
| 2802 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2803 |  |  |  |  |  |  | }; | 
| 2804 |  |  |  |  |  |  | $Profiles->{'BR-SP'} = # São Paulo | 
| 2805 |  |  |  |  |  |  | { | 
| 2806 |  |  |  |  |  |  | %{$Profiles->{'BR'}}, | 
| 2807 |  |  |  |  |  |  | "Fundação da Cidade de São Paulo (1554)"                                         => "#25-01", # feriado em São Paulo | 
| 2808 |  |  |  |  |  |  | }; | 
| 2809 |  |  |  |  |  |  | $Profiles->{'BR-TO'} = # Tocantins | 
| 2810 |  |  |  |  |  |  | { | 
| 2811 |  |  |  |  |  |  | %{$Profiles->{'BR'}} | 
| 2812 |  |  |  |  |  |  | }; | 
| 2813 |  |  |  |  |  |  |  | 
| 2814 |  |  |  |  |  |  | # Thanks to: | 
| 2815 |  |  |  |  |  |  | # Daniel Crown | 
| 2816 |  |  |  |  |  |  |  | 
| 2817 |  |  |  |  |  |  | $Profiles->{'AR'} = # Argentina | 
| 2818 |  |  |  |  |  |  | { | 
| 2819 |  |  |  |  |  |  | "Año Nuevo"                       => "01-01", | 
| 2820 |  |  |  |  |  |  | "Día de los Reyes (Epifanía)"     => "06-01", | 
| 2821 |  |  |  |  |  |  | "Día de Malvinas"                 => "02-04", | 
| 2822 |  |  |  |  |  |  | "Jueves Santo"                    => "-3", | 
| 2823 |  |  |  |  |  |  | "Viernes Santo"                   => "-2", | 
| 2824 |  |  |  |  |  |  | "Domingo de Páscuas"              => "+0", | 
| 2825 |  |  |  |  |  |  | "Lunes de Páscuas"                => "+1", | 
| 2826 |  |  |  |  |  |  | "Día del Trabajo"                 => "01-05", | 
| 2827 |  |  |  |  |  |  | "Revolución de Mayo"              => "25-05", | 
| 2828 |  |  |  |  |  |  | "Soberanía de las Islas Malvinas" => "10-06", | 
| 2829 |  |  |  |  |  |  | "Día del Padre"                   => "3/Sun/Jun", | 
| 2830 |  |  |  |  |  |  | "Día de la Bandera"               => "20-06", | 
| 2831 |  |  |  |  |  |  | "Día del Niño"                    => "03-07", | 
| 2832 |  |  |  |  |  |  | "Día de la Independencia"         => "09-07", | 
| 2833 |  |  |  |  |  |  | "Día de Eva Peron"                => "26-07", | 
| 2834 |  |  |  |  |  |  | "La Asunción"                     => "15-08", | 
| 2835 |  |  |  |  |  |  | "Día de San Martin"               => "17-08", | 
| 2836 |  |  |  |  |  |  | "Muerte de San Martin"            => "18-08", | 
| 2837 |  |  |  |  |  |  | "Día de la Raza"                  => "12-10", | 
| 2838 |  |  |  |  |  |  | "Día de la Madre"                 => "3/Sun/Oct", | 
| 2839 |  |  |  |  |  |  | "Día de Todos los Santos"         => "01-11", | 
| 2840 |  |  |  |  |  |  | "Inmaculada Concepción"           => "08-12", | 
| 2841 |  |  |  |  |  |  | "Navidad"                         => "25-12" | 
| 2842 |  |  |  |  |  |  | }; | 
| 2843 |  |  |  |  |  |  |  | 
| 2844 |  |  |  |  |  |  | # Thanks to: | 
| 2845 |  |  |  |  |  |  | # Jabu Virginia Duma, Giant's Castle Lodge, | 
| 2846 |  |  |  |  |  |  | # Drakensberg, 3310 Estcourt, KwaZulu-Natal | 
| 2847 |  |  |  |  |  |  | # Dirk Swart | 
| 2848 |  |  |  |  |  |  | # http://www.gov.za/sa_overview/holidays.htm | 
| 2849 |  |  |  |  |  |  | # http://www.gov.za/events/previous/y2kholidays.htm | 
| 2850 |  |  |  |  |  |  | # Hilda de Jager | 
| 2851 |  |  |  |  |  |  | # Hennie Meyer | 
| 2852 |  |  |  |  |  |  |  | 
| 2853 |  |  |  |  |  |  | $Profiles->{'ZA'} = # South Africa | 
| 2854 |  |  |  |  |  |  | { | 
| 2855 |  |  |  |  |  |  | "Special Y2K Holiday #1"    => \&ZA_Y2K_1, | 
| 2856 |  |  |  |  |  |  | "Special Y2K Holiday #2"    => \&ZA_Y2K_2, | 
| 2857 |  |  |  |  |  |  | "Special Y2K Holiday #3"    => \&ZA_Y2K_3, | 
| 2858 |  |  |  |  |  |  | "New Year's Day"            => \&ZA_New_Year, | 
| 2859 |  |  |  |  |  |  | "Human Rights Day"          => \&ZA_Human_Rights, | 
| 2860 |  |  |  |  |  |  | "Good Friday"               => "-2", | 
| 2861 |  |  |  |  |  |  | "Easter Sunday"             => "+0", | 
| 2862 |  |  |  |  |  |  | "Family Day"                => "+1", | 
| 2863 |  |  |  |  |  |  | "Freedom Day"               => \&ZA_Freedom, | 
| 2864 |  |  |  |  |  |  | "Workers Day"               => \&ZA_Workers, | 
| 2865 |  |  |  |  |  |  | "Youth Day (Soweto Day)"    => \&ZA_Youth, | 
| 2866 |  |  |  |  |  |  | "National Women's Day"      => \&ZA_Women, | 
| 2867 |  |  |  |  |  |  | "Heritage Day"              => \&ZA_Heritage, | 
| 2868 |  |  |  |  |  |  | "Day of Reconciliation"     => \&ZA_Reconciliation, | 
| 2869 |  |  |  |  |  |  | "Christmas"                 => \&ZA_Christmas, | 
| 2870 |  |  |  |  |  |  | "Day of Goodwill"           => \&ZA_Goodwill | 
| 2871 |  |  |  |  |  |  | }; | 
| 2872 |  |  |  |  |  |  |  | 
| 2873 |  |  |  |  |  |  | sub ZA_Y2K_1 | 
| 2874 |  |  |  |  |  |  | { | 
| 2875 | 10 |  |  | 10 | 0 | 19 | my($year,$label) = @_; | 
| 2876 | 10 | 50 |  |  |  | 25 | if ($year == 1999) { return(1999,12,31); } | 
|  | 0 |  |  |  |  | 0 |  | 
| 2877 | 10 |  |  |  |  | 36 | else               { return(); } | 
| 2878 |  |  |  |  |  |  | } | 
| 2879 |  |  |  |  |  |  | sub ZA_Y2K_2 | 
| 2880 |  |  |  |  |  |  | { | 
| 2881 | 10 |  |  | 10 | 0 | 16 | my($year,$label) = @_; | 
| 2882 | 10 | 50 |  |  |  | 25 | if ($year == 2000) { return(2000,1,2); } | 
|  | 10 |  |  |  |  | 31 |  | 
| 2883 | 0 |  |  |  |  | 0 | else               { return(); } | 
| 2884 |  |  |  |  |  |  | } | 
| 2885 |  |  |  |  |  |  | sub ZA_Y2K_3 | 
| 2886 |  |  |  |  |  |  | { | 
| 2887 | 10 |  |  | 10 | 0 | 22 | my($year,$label) = @_; | 
| 2888 | 10 | 50 |  |  |  | 20 | if ($year == 2000) { return(2000,1,3); } | 
|  | 10 |  |  |  |  | 32 |  | 
| 2889 | 0 |  |  |  |  | 0 | else               { return(); } | 
| 2890 |  |  |  |  |  |  | } | 
| 2891 |  |  |  |  |  |  | sub ZA_New_Year | 
| 2892 |  |  |  |  |  |  | { | 
| 2893 | 10 |  |  | 10 | 0 | 19 | my($year,$label) = @_; | 
| 2894 | 10 |  |  |  |  | 26 | return( &Sunday_to_Monday($year,1,1) ); | 
| 2895 |  |  |  |  |  |  | } | 
| 2896 |  |  |  |  |  |  | sub ZA_Human_Rights | 
| 2897 |  |  |  |  |  |  | { | 
| 2898 | 10 |  |  | 10 | 0 | 21 | my($year,$label) = @_; | 
| 2899 | 10 |  |  |  |  | 26 | return( &Sunday_to_Monday($year,3,21) ); | 
| 2900 |  |  |  |  |  |  | } | 
| 2901 |  |  |  |  |  |  | sub ZA_Freedom | 
| 2902 |  |  |  |  |  |  | { | 
| 2903 | 10 |  |  | 10 | 0 | 16 | my($year,$label) = @_; | 
| 2904 | 10 |  |  |  |  | 23 | return( &Sunday_to_Monday($year,4,27) ); | 
| 2905 |  |  |  |  |  |  | } | 
| 2906 |  |  |  |  |  |  | sub ZA_Workers | 
| 2907 |  |  |  |  |  |  | { | 
| 2908 | 10 |  |  | 10 | 0 | 17 | my($year,$label) = @_; | 
| 2909 | 10 |  |  |  |  | 29 | return( &Sunday_to_Monday($year,5,1) ); | 
| 2910 |  |  |  |  |  |  | } | 
| 2911 |  |  |  |  |  |  | sub ZA_Youth | 
| 2912 |  |  |  |  |  |  | { | 
| 2913 | 10 |  |  | 10 | 0 | 26 | my($year,$label) = @_; | 
| 2914 | 10 |  |  |  |  | 45 | return( &Sunday_to_Monday($year,6,16) ); | 
| 2915 |  |  |  |  |  |  | } | 
| 2916 |  |  |  |  |  |  | sub ZA_Women | 
| 2917 |  |  |  |  |  |  | { | 
| 2918 | 10 |  |  | 10 | 0 | 37 | my($year,$label) = @_; | 
| 2919 | 10 |  |  |  |  | 28 | return( &Sunday_to_Monday($year,8,9) ); | 
| 2920 |  |  |  |  |  |  | } | 
| 2921 |  |  |  |  |  |  | sub ZA_Heritage | 
| 2922 |  |  |  |  |  |  | { | 
| 2923 | 10 |  |  | 10 | 0 | 19 | my($year,$label) = @_; | 
| 2924 | 10 |  |  |  |  | 28 | return( &Sunday_to_Monday($year,9,24) ); | 
| 2925 |  |  |  |  |  |  | } | 
| 2926 |  |  |  |  |  |  | sub ZA_Reconciliation | 
| 2927 |  |  |  |  |  |  | { | 
| 2928 | 10 |  |  | 10 | 0 | 19 | my($year,$label) = @_; | 
| 2929 | 10 |  |  |  |  | 25 | return( &Sunday_to_Monday($year,12,16) ); | 
| 2930 |  |  |  |  |  |  | } | 
| 2931 |  |  |  |  |  |  | sub ZA_Christmas | 
| 2932 |  |  |  |  |  |  | { | 
| 2933 | 10 |  |  | 10 | 0 | 19 | my($year,$label) = @_; | 
| 2934 | 10 |  |  |  |  | 28 | return( &Sunday_to_Monday($year,12,25) ); | 
| 2935 |  |  |  |  |  |  | } | 
| 2936 |  |  |  |  |  |  | sub ZA_Goodwill | 
| 2937 |  |  |  |  |  |  | { | 
| 2938 | 10 |  |  | 10 | 0 | 17 | my($year,$label) = @_; | 
| 2939 | 10 |  |  |  |  | 24 | return( &Sunday_to_Monday($year,12,26) ); | 
| 2940 |  |  |  |  |  |  | } | 
| 2941 |  |  |  |  |  |  |  | 
| 2942 |  |  |  |  |  |  | $Profiles->{'ZA-WC'} =  # Western Cape | 
| 2943 |  |  |  |  |  |  | { | 
| 2944 |  |  |  |  |  |  | %{$Profiles->{'ZA'}} | 
| 2945 |  |  |  |  |  |  | }; | 
| 2946 |  |  |  |  |  |  | $Profiles->{'ZA-EC'} =  # Eastern Cape | 
| 2947 |  |  |  |  |  |  | { | 
| 2948 |  |  |  |  |  |  | %{$Profiles->{'ZA'}} | 
| 2949 |  |  |  |  |  |  | }; | 
| 2950 |  |  |  |  |  |  | $Profiles->{'ZA-NC'} =  # Northern Cape | 
| 2951 |  |  |  |  |  |  | { | 
| 2952 |  |  |  |  |  |  | %{$Profiles->{'ZA'}} | 
| 2953 |  |  |  |  |  |  | }; | 
| 2954 |  |  |  |  |  |  | $Profiles->{'ZA-FS'} =  # Free State | 
| 2955 |  |  |  |  |  |  | { | 
| 2956 |  |  |  |  |  |  | %{$Profiles->{'ZA'}} | 
| 2957 |  |  |  |  |  |  | }; | 
| 2958 |  |  |  |  |  |  | $Profiles->{'ZA-NW'} =  # North West | 
| 2959 |  |  |  |  |  |  | { | 
| 2960 |  |  |  |  |  |  | %{$Profiles->{'ZA'}} | 
| 2961 |  |  |  |  |  |  | }; | 
| 2962 |  |  |  |  |  |  | $Profiles->{'ZA-GA'} =  # Gauteng | 
| 2963 |  |  |  |  |  |  | { | 
| 2964 |  |  |  |  |  |  | %{$Profiles->{'ZA'}} | 
| 2965 |  |  |  |  |  |  | }; | 
| 2966 |  |  |  |  |  |  | $Profiles->{'ZA-NP'} =  # Northern Province | 
| 2967 |  |  |  |  |  |  | { | 
| 2968 |  |  |  |  |  |  | %{$Profiles->{'ZA'}} | 
| 2969 |  |  |  |  |  |  | }; | 
| 2970 |  |  |  |  |  |  | $Profiles->{'ZA-MP'} =  # Mpumalanga | 
| 2971 |  |  |  |  |  |  | { | 
| 2972 |  |  |  |  |  |  | %{$Profiles->{'ZA'}} | 
| 2973 |  |  |  |  |  |  | }; | 
| 2974 |  |  |  |  |  |  | $Profiles->{'ZA-KZN'} = # KwaZulu-Natal | 
| 2975 |  |  |  |  |  |  | { | 
| 2976 |  |  |  |  |  |  | %{$Profiles->{'ZA'}} | 
| 2977 |  |  |  |  |  |  | }; | 
| 2978 |  |  |  |  |  |  |  | 
| 2979 |  |  |  |  |  |  | $Profiles->{'sdm'} = # software design & management AG | 
| 2980 |  |  |  |  |  |  | { | 
| 2981 |  |  |  |  |  |  | "Heiligabend"               => ":24.12.", | 
| 2982 |  |  |  |  |  |  | "Sylvester"                 => ":31.12." | 
| 2983 |  |  |  |  |  |  | }; | 
| 2984 |  |  |  |  |  |  |  | 
| 2985 |  |  |  |  |  |  | $Profiles->{'sdm-MUC'} = { %{$Profiles->{'DE-BY'}}, %{$Profiles->{'sdm'}} }; | 
| 2986 |  |  |  |  |  |  | $Profiles->{'sdm-STG'} = { %{$Profiles->{'DE-BW'}}, %{$Profiles->{'sdm'}} }; | 
| 2987 |  |  |  |  |  |  | $Profiles->{'sdm-FFM'} = { %{$Profiles->{'DE-HE'}}, %{$Profiles->{'sdm'}} }; | 
| 2988 |  |  |  |  |  |  | $Profiles->{'sdm-BON'} = { %{$Profiles->{'DE-NW'}}, %{$Profiles->{'sdm'}} }; | 
| 2989 |  |  |  |  |  |  | $Profiles->{'sdm-CGN'} = { %{$Profiles->{'DE-NW'}}, %{$Profiles->{'sdm'}} }; | 
| 2990 |  |  |  |  |  |  | $Profiles->{'sdm-RAT'} = { %{$Profiles->{'DE-NW'}}, %{$Profiles->{'sdm'}} }; | 
| 2991 |  |  |  |  |  |  | $Profiles->{'sdm-HAN'} = { %{$Profiles->{'DE-NI'}}, %{$Profiles->{'sdm'}} }; | 
| 2992 |  |  |  |  |  |  | $Profiles->{'sdm-HH'}  = { %{$Profiles->{'DE-HH'}}, %{$Profiles->{'sdm'}} }; | 
| 2993 |  |  |  |  |  |  | $Profiles->{'sdm-BLN'} = { %{$Profiles->{'DE-BE'}}, %{$Profiles->{'sdm'}} }; | 
| 2994 |  |  |  |  |  |  | $Profiles->{'sdm-DET'} = { %{$Profiles->{'US-MI'}}, %{$Profiles->{'sdm'}} }; | 
| 2995 |  |  |  |  |  |  | $Profiles->{'sdm-ZRH'} = { %{$Profiles->{'CH-DE'}}, %{$Profiles->{'sdm'}} }; | 
| 2996 |  |  |  |  |  |  |  | 
| 2997 |  |  |  |  |  |  | 1; | 
| 2998 |  |  |  |  |  |  |  | 
| 2999 |  |  |  |  |  |  | __END__ |