cpan/Locale-Codes/internal/data.country.pl

   1 #!/usr/bin/perl -w
   2 # Copyright (c) 2010-2010 Sullivan Beck.  All rights reserved.
   3 # This program is free software; you can redistribute it and/or modify it
   4 # under the same terms as Perl itself.
   5
   6 # This is used to match country names from one source with those from
   7 # an existing source.
   8 #
   9 %country_alias =
  10   (
  11    "Bahamas, The"                                 => "Bahamas",
  12    "Bolivia (Plurinational State of)"             => "Bolivia, Plurinational State of",
  13    "Bolivia"                                      => "Bolivia, Plurinational State of",
  14    "British Virgin Islands"                       => "Virgin Islands, British",
  15    "Brunei"                                       => "Brunei Darussalam",
  16    "Burma"                                        => "Myanmar",
  17    "China, Hong Kong Special Administrative Region" => "Hong Kong",
  18    "China, Macao Special Administrative Region"   => "Macao",
  19    "Cocos Islands"                                => "Cocos (Keeling) Islands",
  20    "Congo (Brazzaville)"                          => "Congo",
  21    "Democratic People's Republic of Korea"        => "Korea, Democratic People's Republic of",
  22    "Democratic Republic of the Congo"             => "Congo, The Democratic Republic of the",
  23    "East Timor"                                   => "Timor-Leste",
  24    "Faeroe Islands"                               => "Faroe Islands",
  25    "Falkland Islands (Islas Malvinas)"            => "Falkland Islands (Malvinas)",
  26    "Federated States of Micronesia"               => "Micronesia, Federated States of",
  27    "French Southern and Antarctic Lands"          => "French Southern Territories",
  28    "Gambia, The"                                  => "Gambia",
  29    "Golan Heights (Israeli-occupied)"             => "Syrian Arab Republic",
  30    "Great Britain"                                => "United Kingdom",
  31    "Holy See"                                     => "Holy See (Vatican City State)",
  32    "Hong Kong S.A.R."                             => "Hong Kong",
  33    "Hong Kong Special Administrative Region of China" => "Hong Kong",
  34    "Iran (Islamic Republic of)"                   => "Iran, Islamic Republic of",
  35    "Iran"                                         => "Iran, Islamic Republic of",
  36    "Kazakstan"                                    => "Kazakhstan",
  37    "Keeling Islands"                              => "Cocos (Keeling) Islands",
  38    "Libya"                                        => "Libyan Arab Jamahiriya",
  39    "Macao Special Administrative Region of China" => "Macao",
  40    "Macau S.A.R"                                  => "Macao",
  41    "Macau S.A.R."                                 => "Macao",
  42    "Macedonia"                                    => "Macedonia, The Former Yugoslav Republic of",
  43    "Macedonia, Former Yugoslav Republic of"       => "Macedonia, The Former Yugoslav Republic of",
  44    "Micronesia (Federated States of)"             => "Micronesia, Federated States of",
  45    "North Korea"                                  => "Korea, Democratic People's Republic of",
  46    "Occupied Palestinian Territory"               => "Palestinian Territory, Occupied",
  47    "Pitcairn Island"                              => "Pitcairn",
  48    "Pitcairn Islands"                             => "Pitcairn",
  49    "Republic of Korea"                            => "Korea, Republic of",
  50    "Republic of Moldova"                          => "Moldova, Republic of",
  51    "Saint Helena"                                 => "Saint Helena, Ascension and Tristan da Cunha",
  52    "Saint-Barthelemy"                             => "Saint Barthelemy",
  53    "Saint-Martin (French part)"                   => "Saint Martin",
  54    "South Korea"                                  => "Korea, Republic of",
  55    "Svalbard and Jan Mayen Islands"               => "Svalbard and Jan Mayen",
  56    "Taiwan"                                       => "Taiwan, Province of China",
  57    "The Bahamas"                                  => "Bahamas",
  58    "The Democratic Republic of the Congo"         => "Congo, The Democratic Republic of the",
  59    "The Republic of the Congo"                    => "Congo",
  60    "The former Yugoslav Republic of Macedonia"    => "Macedonia, The Former Yugoslav Republic of",
  61    "UK"                                           => "United Kingdom",
  62    "US"                                           => "United States",
  63    "USA"                                          => "United States",
  64    "United Kingdom of Great Britain and Northern Ireland" => "United Kingdom",
  65    "United Republic of Tanzania"                  => "Tanzania, United Republic of",
  66    "United States Virgin Islands"                 => "Virgin Islands, U.S.",
  67    "United States of America"                     => "United States",
  68    "Vatican City"                                 => "Holy See (Vatican City State)",
  69    "Venezuela (Bolivarian Republic of)"           => "Venezuela, Bolivarian Republic of",
  70    "Venezuela"                                    => "Venezuela, Bolivarian Republic of",
  71    "Vietnam"                                      => "Viet Nam",
  72    "Virgin Islands (UK)"                          => "Virgin Islands, British",
  73    "Virgin Islands (US)"                          => "Virgin Islands, U.S.",
  74    "Virgin Islands"                               => "Virgin Islands, U.S.",
  75    "Wallis and Futuna Islands"                    => "Wallis and Futuna",
  76   );
  77
  78 # From v. 2.xx:
  79 #   Zaire
  80 #   Serbia and Montenegro
  81 #   Yugoslavia
  82 #   Jan Mayen
  83 #   Svalbard
  84
  85 ################################################################################
  86 # ISO 3166-1 countries
  87
  88 %country_iso_orig =
  89   (
  90    "AFGHANISTAN"                                  => "Afghanistan",
  91    "ÅLAND ISLANDS"                                => "Aland Islands",
  92    "ALBANIA"                                      => "Albania",
  93    "ALGERIA"                                      => "Algeria",
  94    "AMERICAN SAMOA"                               => "American Samoa",
  95    "ANDORRA"                                      => "Andorra",
  96    "ANGOLA"                                       => "Angola",
  97    "ANGUILLA"                                     => "Anguilla",
  98    "ANTARCTICA"                                   => "Antarctica",
  99    "ANTIGUA AND BARBUDA"                          => "Antigua and Barbuda",
 100    "ARGENTINA"                                    => "Argentina",
 101    "ARMENIA"                                      => "Armenia",
 102    "ARUBA"                                        => "Aruba",
 103    "AUSTRALIA"                                    => "Australia",
 104    "AUSTRIA"                                      => "Austria",
 105    "AZERBAIJAN"                                   => "Azerbaijan",
 106    "BAHAMAS"                                      => "Bahamas",
 107    "BAHRAIN"                                      => "Bahrain",
 108    "BANGLADESH"                                   => "Bangladesh",
 109    "BARBADOS"                                     => "Barbados",
 110    "BELARUS"                                      => "Belarus",
 111    "BELGIUM"                                      => "Belgium",
 112    "BELIZE"                                       => "Belize",
 113    "BENIN"                                        => "Benin",
 114    "BERMUDA"                                      => "Bermuda",
 115    "BHUTAN"                                       => "Bhutan",
 116    "BOLIVIA, PLURINATIONAL STATE OF"              => "Bolivia, Plurinational State of",
 117    "BOSNIA AND HERZEGOVINA"                       => "Bosnia and Herzegovina",
 118    "BOTSWANA"                                     => "Botswana",
 119    "BOUVET ISLAND"                                => "Bouvet Island",
 120    "BRAZIL"                                       => "Brazil",
 121    "BRITISH INDIAN OCEAN TERRITORY"               => "British Indian Ocean Territory",
 122    "BRUNEI DARUSSALAM"                            => "Brunei Darussalam",
 123    "BULGARIA"                                     => "Bulgaria",
 124    "BURKINA FASO"                                 => "Burkina Faso",
 125    "BURUNDI"                                      => "Burundi",
 126    "CAMBODIA"                                     => "Cambodia",
 127    "CAMEROON"                                     => "Cameroon",
 128    "CANADA"                                       => "Canada",
 129    "CAPE VERDE"                                   => "Cape Verde",
 130    "CAYMAN ISLANDS"                               => "Cayman Islands",
 131    "CENTRAL AFRICAN REPUBLIC"                     => "Central African Republic",
 132    "CHAD"                                         => "Chad",
 133    "CHILE"                                        => "Chile",
 134    "CHINA"                                        => "China",
 135    "CHRISTMAS ISLAND"                             => "Christmas Island",
 136    "COCOS (KEELING) ISLANDS"                      => "Cocos (Keeling) Islands",
 137    "COLOMBIA"                                     => "Colombia",
 138    "COMOROS"                                      => "Comoros",
 139    "CONGO"                                        => "Congo",
 140    "CONGO, THE DEMOCRATIC REPUBLIC OF THE"        => "Congo, The Democratic Republic of the",
 141    "COOK ISLANDS"                                 => "Cook Islands",
 142    "COSTA RICA"                                   => "Costa Rica",
 143    "CÔTE D'IVOIRE"                                => "Cote d'Ivoire",
 144    "CROATIA"                                      => "Croatia",
 145    "CUBA"                                         => "Cuba",
 146    "CYPRUS"                                       => "Cyprus",
 147    "CZECH REPUBLIC"                               => "Czech Republic",
 148    "DENMARK"                                      => "Denmark",
 149    "DJIBOUTI"                                     => "Djibouti",
 150    "DOMINICA"                                     => "Dominica",
 151    "DOMINICAN REPUBLIC"                           => "Dominican Republic",
 152    "ECUADOR"                                      => "Ecuador",
 153    "EGYPT"                                        => "Egypt",
 154    "EL SALVADOR"                                  => "El Salvador",
 155    "EQUATORIAL GUINEA"                            => "Equatorial Guinea",
 156    "ERITREA"                                      => "Eritrea",
 157    "ESTONIA"                                      => "Estonia",
 158    "ETHIOPIA"                                     => "Ethiopia",
 159    "FALKLAND ISLANDS (MALVINAS)"                  => "Falkland Islands (Malvinas)",
 160    "FAROE ISLANDS"                                => "Faroe Islands",
 161    "FIJI"                                         => "Fiji",
 162    "FINLAND"                                      => "Finland",
 163    "FRANCE"                                       => "France",
 164    "FRENCH GUIANA"                                => "French Guiana",
 165    "FRENCH POLYNESIA"                             => "French Polynesia",
 166    "FRENCH SOUTHERN TERRITORIES"                  => "French Southern Territories",
 167    "GABON"                                        => "Gabon",
 168    "GAMBIA"                                       => "Gambia",
 169    "GEORGIA"                                      => "Georgia",
 170    "GERMANY"                                      => "Germany",
 171    "GHANA"                                        => "Ghana",
 172    "GIBRALTAR"                                    => "Gibraltar",
 173    "GREECE"                                       => "Greece",
 174    "GREENLAND"                                    => "Greenland",
 175    "GRENADA"                                      => "Grenada",
 176    "GUADELOUPE"                                   => "Guadeloupe",
 177    "GUAM"                                         => "Guam",
 178    "GUATEMALA"                                    => "Guatemala",
 179    "GUERNSEY"                                     => "Guernsey",
 180    "GUINEA"                                       => "Guinea",
 181    "GUINEA-BISSAU"                                => "Guinea-Bissau",
 182    "GUYANA"                                       => "Guyana",
 183    "HAITI"                                        => "Haiti",
 184    "HEARD ISLAND AND MCDONALD ISLANDS"            => "Heard Island and Mcdonald Islands",
 185    "HOLY SEE (VATICAN CITY STATE)"                => "Holy See (Vatican City State)",
 186    "HONDURAS"                                     => "Honduras",
 187    "HONG KONG"                                    => "Hong Kong",
 188    "HUNGARY"                                      => "Hungary",
 189    "ICELAND"                                      => "Iceland",
 190    "INDIA"                                        => "India",
 191    "INDONESIA"                                    => "Indonesia",
 192    "IRAN, ISLAMIC REPUBLIC OF"                    => "Iran, Islamic Republic of",
 193    "IRAQ"                                         => "Iraq",
 194    "IRELAND"                                      => "Ireland",
 195    "ISLE OF MAN"                                  => "Isle of Man",
 196    "ISRAEL"                                       => "Israel",
 197    "ITALY"                                        => "Italy",
 198    "JAMAICA"                                      => "Jamaica",
 199    "JAPAN"                                        => "Japan",
 200    "JERSEY"                                       => "Jersey",
 201    "JORDAN"                                       => "Jordan",
 202    "KAZAKHSTAN"                                   => "Kazakhstan",
 203    "KENYA"                                        => "Kenya",
 204    "KIRIBATI"                                     => "Kiribati",
 205    "KOREA, DEMOCRATIC PEOPLE'S REPUBLIC OF"       => "Korea, Democratic People's Republic of",
 206    "KOREA, REPUBLIC OF"                           => "Korea, Republic of",
 207    "KUWAIT"                                       => "Kuwait",
 208    "KYRGYZSTAN"                                   => "Kyrgyzstan",
 209    "LAO PEOPLE'S DEMOCRATIC REPUBLIC"             => "Lao People's Democratic Republic",
 210    "LATVIA"                                       => "Latvia",
 211    "LEBANON"                                      => "Lebanon",
 212    "LESOTHO"                                      => "Lesotho",
 213    "LIBERIA"                                      => "Liberia",
 214    "LIBYAN ARAB JAMAHIRIYA"                       => "Libyan Arab Jamahiriya",
 215    "LIECHTENSTEIN"                                => "Liechtenstein",
 216    "LITHUANIA"                                    => "Lithuania",
 217    "LUXEMBOURG"                                   => "Luxembourg",
 218    "MACAO"                                        => "Macao",
 219    "MACEDONIA, THE FORMER YUGOSLAV REPUBLIC OF"   => "Macedonia, The Former Yugoslav Republic of",
 220    "MADAGASCAR"                                   => "Madagascar",
 221    "MALAWI"                                       => "Malawi",
 222    "MALAYSIA"                                     => "Malaysia",
 223    "MALDIVES"                                     => "Maldives",
 224    "MALI"                                         => "Mali",
 225    "MALTA"                                        => "Malta",
 226    "MARSHALL ISLANDS"                             => "Marshall Islands",
 227    "MARTINIQUE"                                   => "Martinique",
 228    "MAURITANIA"                                   => "Mauritania",
 229    "MAURITIUS"                                    => "Mauritius",
 230    "MAYOTTE"                                      => "Mayotte",
 231    "MEXICO"                                       => "Mexico",
 232    "MICRONESIA, FEDERATED STATES OF"              => "Micronesia, Federated States of",
 233    "MOLDOVA, REPUBLIC OF"                         => "Moldova, Republic of",
 234    "MONACO"                                       => "Monaco",
 235    "MONGOLIA"                                     => "Mongolia",
 236    "MONTENEGRO"                                   => "Montenegro",
 237    "MONTSERRAT"                                   => "Montserrat",
 238    "MOROCCO"                                      => "Morocco",
 239    "MOZAMBIQUE"                                   => "Mozambique",
 240    "MYANMAR"                                      => "Myanmar",
 241    "NAMIBIA"                                      => "Namibia",
 242    "NAURU"                                        => "Nauru",
 243    "NEPAL"                                        => "Nepal",
 244    "NETHERLANDS"                                  => "Netherlands",
 245    "NETHERLANDS ANTILLES"                         => "Netherlands Antilles",
 246    "NEW CALEDONIA"                                => "New Caledonia",
 247    "NEW ZEALAND"                                  => "New Zealand",
 248    "NICARAGUA"                                    => "Nicaragua",
 249    "NIGER"                                        => "Niger",
 250    "NIGERIA"                                      => "Nigeria",
 251    "NIUE"                                         => "Niue",
 252    "NORFOLK ISLAND"                               => "Norfolk Island",
 253    "NORTHERN MARIANA ISLANDS"                     => "Northern Mariana Islands",
 254    "NORWAY"                                       => "Norway",
 255    "OMAN"                                         => "Oman",
 256    "PAKISTAN"                                     => "Pakistan",
 257    "PALAU"                                        => "Palau",
 258    "PALESTINIAN TERRITORY, OCCUPIED"              => "Palestinian Territory, Occupied",
 259    "PANAMA"                                       => "Panama",
 260    "PAPUA NEW GUINEA"                             => "Papua New Guinea",
 261    "PARAGUAY"                                     => "Paraguay",
 262    "PERU"                                         => "Peru",
 263    "PHILIPPINES"                                  => "Philippines",
 264    "PITCAIRN"                                     => "Pitcairn",
 265    "POLAND"                                       => "Poland",
 266    "PORTUGAL"                                     => "Portugal",
 267    "PUERTO RICO"                                  => "Puerto Rico",
 268    "QATAR"                                        => "Qatar",
 269    "RÉUNION"                                      => "Reunion",
 270    "ROMANIA"                                      => "Romania",
 271    "RUSSIAN FEDERATION"                           => "Russian Federation",
 272    "RWANDA"                                       => "Rwanda",
 273    "SAINT BARTHÉLEMY"                             => "Saint Barthelemy",
 274    "SAINT HELENA, ASCENSION AND TRISTAN DA CUNHA" => "Saint Helena, Ascension and Tristan da Cunha",
 275    "SAINT KITTS AND NEVIS"                        => "Saint Kitts and Nevis",
 276    "SAINT LUCIA"                                  => "Saint Lucia",
 277    "SAINT MARTIN"                                 => "Saint Martin",
 278    "SAINT PIERRE AND MIQUELON"                    => "Saint Pierre and Miquelon",
 279    "SAINT VINCENT AND THE GRENADINES"             => "Saint Vincent and the Grenadines",
 280    "SAMOA"                                        => "Samoa",
 281    "SAN MARINO"                                   => "San Marino",
 282    "SAO TOME AND PRINCIPE"                        => "Sao Tome and Principe",
 283    "SAUDI ARABIA"                                 => "Saudi Arabia",
 284    "SENEGAL"                                      => "Senegal",
 285    "SERBIA"                                       => "Serbia",
 286    "SEYCHELLES"                                   => "Seychelles",
 287    "SIERRA LEONE"                                 => "Sierra Leone",
 288    "SINGAPORE"                                    => "Singapore",
 289    "SLOVAKIA"                                     => "Slovakia",
 290    "SLOVENIA"                                     => "Slovenia",
 291    "SOLOMON ISLANDS"                              => "Solomon Islands",
 292    "SOMALIA"                                      => "Somalia",
 293    "SOUTH AFRICA"                                 => "South Africa",
 294    "SOUTH GEORGIA AND THE SOUTH SANDWICH ISLANDS" => "South Georgia and the South Sandwich Islands",
 295    "SPAIN"                                        => "Spain",
 296    "SRI LANKA"                                    => "Sri Lanka",
 297    "SUDAN"                                        => "Sudan",
 298    "SURINAME"                                     => "Suriname",
 299    "SVALBARD AND JAN MAYEN"                       => "Svalbard and Jan Mayen",
 300    "SWAZILAND"                                    => "Swaziland",
 301    "SWEDEN"                                       => "Sweden",
 302    "SWITZERLAND"                                  => "Switzerland",
 303    "SYRIAN ARAB REPUBLIC"                         => "Syrian Arab Republic",
 304    "TAIWAN, PROVINCE OF CHINA"                    => "Taiwan, Province of China",
 305    "TAJIKISTAN"                                   => "Tajikistan",
 306    "TANZANIA, UNITED REPUBLIC OF"                 => "Tanzania, United Republic of",
 307    "THAILAND"                                     => "Thailand",
 308    "TIMOR-LESTE"                                  => "Timor-Leste",
 309    "TOGO"                                         => "Togo",
 310    "TOKELAU"                                      => "Tokelau",
 311    "TONGA"                                        => "Tonga",
 312    "TRINIDAD AND TOBAGO"                          => "Trinidad and Tobago",
 313    "TUNISIA"                                      => "Tunisia",
 314    "TURKEY"                                       => "Turkey",
 315    "TURKMENISTAN"                                 => "Turkmenistan",
 316    "TURKS AND CAICOS ISLANDS"                     => "Turks and Caicos Islands",
 317    "TUVALU"                                       => "Tuvalu",
 318    "UGANDA"                                       => "Uganda",
 319    "UKRAINE"                                      => "Ukraine",
 320    "UNITED ARAB EMIRATES"                         => "United Arab Emirates",
 321    "UNITED KINGDOM"                               => "United Kingdom",
 322    "UNITED STATES"                                => "United States",
 323    "UNITED STATES MINOR OUTLYING ISLANDS"         => "United States Minor Outlying Islands",
 324    "URUGUAY"                                      => "Uruguay",
 325    "UZBEKISTAN"                                   => "Uzbekistan",
 326    "VANUATU"                                      => "Vanuatu",
 327    "VENEZUELA, BOLIVARIAN REPUBLIC OF"            => "Venezuela, Bolivarian Republic of",
 328    "VIET NAM"                                     => "Viet Nam",
 329    "VIRGIN ISLANDS, BRITISH"                      => "Virgin Islands, British",
 330    "VIRGIN ISLANDS, U.S."                         => "Virgin Islands, U.S.",
 331    "WALLIS AND FUTUNA"                            => "Wallis and Futuna",
 332    "WESTERN SAHARA"                               => "Western Sahara",
 333    "YEMEN"                                        => "Yemen",
 334    "ZAMBIA"                                       => "Zambia",
 335    "ZIMBABWE"                                     => "Zimbabwe",
 336   );
 337
 338 ################################################################################
 339 # United Nations (source of alpha-3 and numeric codes)
 340
 341 %country_un_orig =
 342   (
 343    '&Aring;land Islands'                          => "Aland Islands",
 344    'C&ocirc;te d'."'Ivoire"                       => "Cote d'Ivoire",
 345    'Réunion'                                      => "Reunion",
 346    'Saint-Barth&eacute;lemy'                      => "Saint-Barthelemy",
 347   );
 348
 349 ################################################################################
 350 # NGA (source of FIPS 10 codes)
 351
 352 %country_nga_orig =
 353   (
 354   );
 355
 356 %country_nga_ignore =
 357   (
 358    "Golan Heights (Israeli-occupied)"            => 1,
 359   );
 360
 361 ################################################################################
 362 # IANA (source of top level domains)
 363
 364 %country_iana_orig =
 365   (
 366   );
 367
 368 ################################################################################
 369 # CIA World Factbook (checks for codes)
 370
 371 %country_cia_orig =
 372   (
 373   );
 374
 375 %country_cia_ignore =
 376   (
 377    "Western Samoa"               => 1,
 378    "World"                       => 1,
 379    "Zaire"                       => 1,
 380   );
 381
 382 %country_cia_codes =
 383   (
 384    "alpha2" => {"Gaza Strip"      => "-",
 385                 "West Bank"       => "-",
 386                 "Svalbard"        => "-",
 387                },
 388    "alpha3" => {"Gaza Strip"      => "-",
 389                 "West Bank"       => "-",
 390                 "Svalbard"        => "-",
 391                },
 392    "num"    => {"Gaza Strip"      => "-",
 393                 "West Bank"       => "-",
 394                 "Svalbard"        => "-",
 395                },
 396    "fips"   => {
 397                },
 398    "dom"    => {"Gaza Strip"      => "-",
 399                 "West Bank"       => "-",
 400                 "Svalbard"        => "-",
 401                },
 402   );
 403
 404 1;
 405
 406 # Local Variables:
 407 # mode: cperl
 408 # indent-tabs-mode: nil
 409 # cperl-indent-level: 3
 410 # cperl-continued-statement-offset: 2
 411 # cperl-continued-brace-offset: 0
 412 # cperl-brace-offset: 0
 413 # cperl-brace-imaginary-offset: 0
 414 # cperl-label-offset: -2
 415 # End:
 416