2004-06-11 04:50:29 +00:00
|
|
|
<?php
|
2005-04-05 11:08:23 +00:00
|
|
|
/**
|
|
|
|
|
* @package MediaWiki
|
|
|
|
|
* @subpackage Language
|
|
|
|
|
*/
|
2004-06-11 04:50:29 +00:00
|
|
|
/* private */ $wgLanguageNames = array(
|
|
|
|
|
'aa' => 'Afar', # Afar
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ab' => 'Аҧсуа', # Abkhaz, should possibly add ' бысжѡа'
|
2004-06-11 04:50:29 +00:00
|
|
|
'af' => 'Afrikaans', # Afrikaans
|
|
|
|
|
'ak' => 'Akana', # Akan
|
2006-02-24 21:15:33 +00:00
|
|
|
'als' => 'Alemannisch', # Alemannic -- not a valid code, for compatibility
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'am' => 'አማርኛ', # Amharic
|
|
|
|
|
'an' => 'Aragonés', # Aragonese
|
2005-01-30 21:39:32 +00:00
|
|
|
'ang' => 'Anglo Saxon', # Old English
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ar' => 'العربية', # Arabic
|
|
|
|
|
'arc' => 'ܕܥܒܪܸܝܛ', # Aramaic
|
|
|
|
|
'as' => 'অসমীয়া', # Assamese
|
2005-01-30 21:39:32 +00:00
|
|
|
'ast' => 'Asturianu', # Asturian
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'av' => 'Авар', # Avar
|
|
|
|
|
'ay' => 'Aymar', # Aymara, should possibly be Aymará
|
|
|
|
|
'az' => 'Azərbaycan', # Azerbaijani
|
|
|
|
|
'ba' => 'Башҡорт', # Bashkir
|
2006-03-24 22:10:00 +00:00
|
|
|
'bat-smg' => 'Žemaitėška', # Samogitian
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'be' => 'Беларуская', # Belarusian ''or'' Byelarussian
|
|
|
|
|
'bg' => 'Български', # Bulgarian
|
|
|
|
|
'bh' => 'भोजपुरी', # Bihara
|
2004-06-11 04:50:29 +00:00
|
|
|
'bi' => 'Bislama', # Bislama
|
2005-01-30 21:39:32 +00:00
|
|
|
'bm' => 'Bamanankan', # Bambara
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'bn' => 'বাংলা', # Bengali
|
|
|
|
|
'bo' => 'བོད་ཡིག', # Tibetan
|
2004-08-09 22:57:53 +00:00
|
|
|
'br' => 'Brezhoneg', # Breton
|
2004-06-11 04:50:29 +00:00
|
|
|
'bs' => 'Bosanski', # Bosnian
|
2005-10-24 06:50:54 +00:00
|
|
|
'bug' => 'ᨅᨔ ᨕᨘᨁᨗ', # Buginese
|
2005-04-03 20:33:09 +00:00
|
|
|
'ca' => 'Català', # Catalan
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ce' => 'Нохчийн', # Chechen
|
2005-06-22 08:15:22 +00:00
|
|
|
'ceb' => 'Cebuano', # Cebuano
|
2004-06-11 04:50:29 +00:00
|
|
|
'ch' => 'Chamoru', # Chamorro
|
2005-01-30 21:39:32 +00:00
|
|
|
'cho' => 'Choctaw', # Choctaw
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'chr' => 'ᏣᎳᎩ', # Cherokee
|
2005-04-03 20:33:09 +00:00
|
|
|
'chy' => 'Tsetsêhestâhese', # Cheyenne
|
2004-06-11 04:50:29 +00:00
|
|
|
'co' => 'Corsu', # Corsican
|
2006-04-05 00:45:34 +00:00
|
|
|
'cr' => 'Nēhiyaw / ᓀᐦᐃᔭᐤ', # Cree
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'cs' => 'Česky', # Czech
|
2005-07-11 23:52:42 +00:00
|
|
|
'csb' => 'Kaszëbsczi', # Cassubian
|
2005-04-13 21:32:16 +00:00
|
|
|
'cv' => 'Чӑваш', # Chuvash
|
2004-06-11 04:50:29 +00:00
|
|
|
'cy' => 'Cymraeg', # Welsh
|
|
|
|
|
'da' => 'Dansk', # Danish
|
|
|
|
|
'de' => 'Deutsch', # German
|
2005-01-30 21:39:32 +00:00
|
|
|
'dk' => 'Dansk', # Unused code currently redirecting to Danish, 'da' is correct for the language
|
2005-09-24 08:02:55 +00:00
|
|
|
'dv' => 'ދިވެހިބަސް', # Dhivehi
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'dz' => 'ཇོང་ཁ', # Bhutani
|
|
|
|
|
'ee' => 'Ɛʋɛ', # Ewe
|
|
|
|
|
'el' => 'Ελληνικά', # Greek
|
2004-06-11 04:50:29 +00:00
|
|
|
'en' => 'English', # English
|
|
|
|
|
'eo' => 'Esperanto', # Esperanto
|
2005-04-03 20:33:09 +00:00
|
|
|
'es' => 'Español', # Spanish
|
2004-06-11 04:50:29 +00:00
|
|
|
'et' => 'Eesti', # Estonian
|
|
|
|
|
'eu' => 'Euskara', # Basque
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'fa' => 'فارسی', # Persian
|
2005-01-30 21:39:32 +00:00
|
|
|
'ff' => 'Fulfulde', # Fulah
|
2004-06-11 04:50:29 +00:00
|
|
|
'fi' => 'Suomi', # Finnish
|
2005-06-22 08:15:22 +00:00
|
|
|
'fiu-vro' => 'Võro', # Võro
|
2004-06-11 04:50:29 +00:00
|
|
|
'fj' => 'Na Vosa Vakaviti', # Fijian
|
2005-04-03 20:33:09 +00:00
|
|
|
'fo' => 'Føroyskt', # Faroese
|
|
|
|
|
'fr' => 'Français', # French
|
2006-03-24 22:10:00 +00:00
|
|
|
'frp' => 'Arpitan', # Franco-Provençal/Arpitan
|
2005-01-25 06:27:22 +00:00
|
|
|
'fur' => 'Furlan', # Friulian
|
2004-06-11 04:50:29 +00:00
|
|
|
'fy' => 'Frysk', # Frisian
|
|
|
|
|
'ga' => 'Gaeilge', # Irish
|
2005-04-03 20:33:09 +00:00
|
|
|
'gd' => 'Gàidhlig', # Scots Gaelic
|
2004-06-11 04:50:29 +00:00
|
|
|
'gl' => 'Galego', # Gallegan
|
2005-04-03 20:33:09 +00:00
|
|
|
'gn' => 'Avañe\'ẽ', # Guarani
|
2005-04-03 22:15:50 +00:00
|
|
|
'got' => '𐌲𐌿𐍄𐌹𐍃𐌺', # Gothic
|
2006-02-24 21:15:33 +00:00
|
|
|
'gsw' => 'Alemannisch', # Alemannic
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'gu' => 'ગુજરાતી', # Gujarati
|
2004-06-11 04:50:29 +00:00
|
|
|
'gv' => 'Gaelg', # Manx
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ha' => 'هَوُسَ', # Hausa
|
2004-06-11 04:50:29 +00:00
|
|
|
'haw' => 'Hawai`i', # Hawaiian
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'he' => 'עברית', # Hebrew
|
|
|
|
|
'hi' => 'हिन्दी', # Hindi
|
2005-01-30 21:39:32 +00:00
|
|
|
'ho' => 'Hiri Motu', # Hiri Motu
|
2004-06-11 04:50:29 +00:00
|
|
|
'hr' => 'Hrvatski', # Croatian
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ht' => 'Krèyol ayisyen', # Haitian, common/popular form is Kreyòl
|
2004-06-11 04:50:29 +00:00
|
|
|
'hu' => 'Magyar', # Hungarian
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'hy' => 'Հայերեն', # Armenian
|
2004-06-11 04:50:29 +00:00
|
|
|
'hz' => 'Otsiherero', # Herero
|
|
|
|
|
'ia' => 'Interlingua', # Interlingua (IALA)
|
|
|
|
|
'id' => 'Bahasa Indonesia', # Indonesian
|
|
|
|
|
'ie' => 'Interlingue', # Interlingue (Occidental)
|
|
|
|
|
'ig' => 'Igbo', # Igbo
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ii' => 'ꆇꉙ', # Sichuan Yi
|
2005-04-03 20:33:09 +00:00
|
|
|
'ik' => 'Iñupiak', # Inupiak
|
2005-10-07 13:29:37 +00:00
|
|
|
'ilo' => 'Ilokano', # Ilokano
|
2004-06-11 04:50:29 +00:00
|
|
|
'io' => 'Ido', # Ido
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'is' => 'Íslenska', # Icelandic
|
2004-06-11 04:50:29 +00:00
|
|
|
'it' => 'Italiano', # Italian
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'iu' => 'ᐃᓄᒃᑎᑐᑦ', # Inuktitut
|
|
|
|
|
'ja' => '日本語', # Japanese
|
2005-01-30 21:39:32 +00:00
|
|
|
'jbo' => 'Lojban', # Lojban
|
2005-04-15 13:46:08 +00:00
|
|
|
'jv' => 'Basa Jawa', # Javanese
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ka' => 'ქართული', # Georgian
|
2005-01-30 21:39:32 +00:00
|
|
|
'kg' => 'Kongo', # Kongo, (FIXME!) should probaly be KiKongo or KiKoongo
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ki' => 'Gĩkũyũ', # Kikuyu, correctness not guaranteed
|
2004-06-11 04:50:29 +00:00
|
|
|
'kj' => 'Kuanyama', # Kuanyama (FIXME!)
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'kk' => 'қазақша', # Kazakh
|
2004-06-11 04:50:29 +00:00
|
|
|
'kl' => 'Kalaallisut', # Greenlandic
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'km' => 'ភាសាខ្មែរ', # Cambodian
|
|
|
|
|
'kn' => 'ಕನ್ನಡ', # Kannada
|
|
|
|
|
'ko' => '한국어', # Korean
|
2005-01-30 21:39:32 +00:00
|
|
|
'kr' => 'Kanuri', # Kanuri (FIXME!)
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ks' => 'कश्मीरी - (كشميري)', # Kashmiri
|
2006-03-24 22:10:00 +00:00
|
|
|
'ksh' => 'Ripoarisch', # Ripuarian
|
2006-01-11 03:07:00 +00:00
|
|
|
'ku' => 'Kurdî / كوردي', # Kurdish
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'kv' => 'Коми', # Komi, cyrillic is common script but also written in latin script
|
2004-06-11 04:50:29 +00:00
|
|
|
'kw' => 'Kernewek', # Cornish
|
2006-05-06 20:30:33 +00:00
|
|
|
'ky' => 'Кыргызча', # Kirghiz
|
2004-06-11 04:50:29 +00:00
|
|
|
'la' => 'Latina', # Latin
|
2005-09-25 10:57:51 +00:00
|
|
|
'lad' => 'Ladino', # Ladino
|
2005-04-03 20:33:09 +00:00
|
|
|
'lb' => 'Lëtzebuergesch', # Luxemburguish
|
2004-06-11 04:50:29 +00:00
|
|
|
'lg' => 'Luganda', # Ganda
|
2005-05-14 17:50:33 +00:00
|
|
|
'li' => 'Limburgs', # Limburgian
|
2006-03-24 22:10:00 +00:00
|
|
|
'lij' => 'Líguru', # Ligurian
|
2005-10-24 06:50:54 +00:00
|
|
|
'lmo' => 'Lumbaart', # Lombard
|
2004-06-11 04:50:29 +00:00
|
|
|
'ln' => 'Lingala', # Lingala
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'lo' => 'ລາວ',# Laotian
|
|
|
|
|
'lt' => 'Lietuvių', # Lithuanian
|
2005-04-03 21:02:36 +00:00
|
|
|
'lv' => 'Latviešu', # Latvian
|
2006-03-24 22:10:00 +00:00
|
|
|
'map-bms' => 'Basa Banyumasan', # Banyumasan
|
2005-01-30 21:39:32 +00:00
|
|
|
'mg' => 'Malagasy', # Malagasy
|
2004-06-11 04:50:29 +00:00
|
|
|
'mh' => 'Ebon', # Marshallese
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'mi' => 'Māori', # Maori
|
|
|
|
|
'minnan' => 'Bân-lâm-gú', # Min-nan (also zh-min-nan)
|
|
|
|
|
'mk' => 'Македонски', # Macedonian
|
|
|
|
|
'ml' => 'മലയാളം', # Malayalam
|
|
|
|
|
'mn' => 'Монгол', # Mongoloian
|
2005-07-25 21:34:54 +00:00
|
|
|
'mo' => 'Молдовеняскэ', # Moldovan
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'mr' => 'मराठी', # Marathi
|
2004-06-11 04:50:29 +00:00
|
|
|
'ms' => 'Bahasa Melayu', # Malay
|
2005-11-12 08:21:57 +00:00
|
|
|
'mt' => 'Malti', # Maltese
|
2005-01-30 21:39:32 +00:00
|
|
|
'mus' => 'Muscogee', # Creek, should possibly be Muskogee
|
|
|
|
|
'my' => 'Myanmasa', # Burmese
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'na' => 'Ekakairũ Naoero', # Nauruan
|
|
|
|
|
'nah' => 'Nahuatl', # Nahuatl, en:Wikipedia writes Nahuatlahtolli, while another form is Náhuatl
|
2005-09-25 10:57:51 +00:00
|
|
|
'nap' => 'Nnapulitano', # Neapolitan
|
2005-04-03 20:33:09 +00:00
|
|
|
'nb' => 'Norsk (bokmål)', # Norwegian (Bokmal)
|
|
|
|
|
'nds' => 'Plattdüütsch', # Low German ''or'' Low Saxon
|
2006-03-24 22:10:00 +00:00
|
|
|
'nds-nl' => 'Nedersaksisch', # Dutch Low Saxon
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ne' => 'नेपाली', # Nepali
|
2005-03-13 18:17:47 +00:00
|
|
|
'ng' => 'Oshiwambo', # Ndonga
|
2004-06-11 04:50:29 +00:00
|
|
|
'nl' => 'Nederlands', # Dutch
|
2005-01-30 21:39:32 +00:00
|
|
|
'nn' => 'Norsk (nynorsk)' , # Norwegian (Nynorsk)
|
2005-06-19 01:59:05 +00:00
|
|
|
'no' => 'Norsk (bokmål)', # Norwegian
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'non' => 'Norrǿna', # Old Norse
|
2006-03-24 22:10:00 +00:00
|
|
|
'nrm' => 'Nouormand', # Norman
|
2005-04-03 20:33:09 +00:00
|
|
|
'nv' => 'Diné bizaad', # Navajo
|
2004-06-11 04:50:29 +00:00
|
|
|
'ny' => 'Chi-Chewa', # Chichewa
|
|
|
|
|
'oc' => 'Occitan', # Occitan
|
|
|
|
|
'om' => 'Oromoo', # Oromo
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'or' => 'ଓଡ଼ିଆ', # Oriya
|
|
|
|
|
'os' => 'Иронау', # Ossetic
|
|
|
|
|
'pa' => 'ਪੰਜਾਬੀ', # Punjabi
|
2005-06-22 08:15:22 +00:00
|
|
|
'pam' => 'Pampangan', # Pampanga
|
2006-03-24 22:10:00 +00:00
|
|
|
'pap' => 'Papiamentu', # Papiamentu
|
|
|
|
|
'pdc' => 'Deitsch', # Pennsylvania German
|
2005-10-24 06:50:54 +00:00
|
|
|
'pih' => 'Norfuk / Pitkern', # Norfuk/Pitcairn/Norfolk
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'pi' => 'पािऴ', # Pali
|
2004-06-11 04:50:29 +00:00
|
|
|
'pl' => 'Polski', # Polish
|
2006-03-26 21:12:34 +00:00
|
|
|
'pms' => 'Piemontèis', # Piedmontese
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ps' => 'پښتو', # Pashto
|
2005-04-03 20:33:09 +00:00
|
|
|
'pt' => 'Português', # Portuguese
|
2005-09-05 15:12:43 +00:00
|
|
|
'pt-br' => 'Português do Brasil', # Brazilian Portuguese
|
2004-06-11 04:50:29 +00:00
|
|
|
'qu' => 'Runa Simi', # Quechua
|
|
|
|
|
'rm' => 'Rumantsch', # Raeto-Romance
|
2006-03-24 22:10:00 +00:00
|
|
|
'rmy' => 'Romani', # Vlax Romany
|
2004-06-11 04:50:29 +00:00
|
|
|
'rn' => 'Kirundi', # Kirundi
|
2005-04-03 20:33:09 +00:00
|
|
|
'ro' => 'Română', # Romanian
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'roa-rup' => 'Armâneashti', # Aromanian
|
|
|
|
|
'ru' => 'Русский', # Russian
|
2005-01-30 21:39:32 +00:00
|
|
|
'rw' => 'Kinyarwanda', # Kinyarwanda, should possibly be Kinyarwandi
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'sa' => 'संस्कृत', # Sanskrit
|
2005-01-30 21:39:32 +00:00
|
|
|
'sc' => 'Sardu', # Sardinian
|
|
|
|
|
'scn' => 'Sicilianu', # Sicilian
|
2006-01-07 13:31:29 +00:00
|
|
|
'sco' => 'Scots', # Scots
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'sd' => 'सिनधि', # Sindhi
|
2005-04-03 20:33:09 +00:00
|
|
|
'se' => 'Sámegiella', # Northern Sami
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'sg' => 'Sängö', # Sango, possible alternative is Sangho
|
2005-10-24 06:39:54 +00:00
|
|
|
'sh' => 'Srpskohrvatski / Српскохрватски', # Serbocroatian
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'si' => 'සිංහල', # Sinhalese
|
2005-01-30 21:39:32 +00:00
|
|
|
'simple' => 'Simple English', # Simple English
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'sk' => 'Slovenčina', # Slovak
|
2005-04-03 21:02:36 +00:00
|
|
|
'sl' => 'Slovenščina', # Slovenian
|
2004-06-11 04:50:29 +00:00
|
|
|
'sm' => 'Gagana Samoa', # Samoan
|
|
|
|
|
'sn' => 'chiShona', # Shona
|
|
|
|
|
'so' => 'Soomaaliga', # Somali
|
|
|
|
|
'sq' => 'Shqip', # Albanian
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'sr' => 'Српски / Srpski', # Serbian
|
2006-03-02 22:22:18 +00:00
|
|
|
'sr-ec' => 'екавица', # Serbian cyrillic ekavian
|
|
|
|
|
'sr-jc' => 'ијекавица', # Serbian cyrillic iyekvian
|
|
|
|
|
'sr-el' => 'ekavica', # Serbian latin ekavian
|
|
|
|
|
'sr-jl' => 'ijekavica', # Serbian latin iyekavian
|
2004-06-11 04:50:29 +00:00
|
|
|
'ss' => 'SiSwati', # Swati
|
2005-01-30 21:39:32 +00:00
|
|
|
'st' => 'seSotho', # Southern Sotho
|
2005-04-08 21:01:13 +00:00
|
|
|
'su' => 'Basa Sunda', # Sundanese
|
2004-06-11 04:50:29 +00:00
|
|
|
'sv' => 'Svenska', # Swedish
|
|
|
|
|
'sw' => 'Kiswahili', # Swahili
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ta' => 'தமிழ்', # Tamil
|
|
|
|
|
'te' => 'తెలుగు', # Telugu
|
2006-03-24 22:10:00 +00:00
|
|
|
'tet' => 'Tetun', # Tetun
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'tg' => 'Тоҷикӣ', # Tajik
|
|
|
|
|
'th' => 'ไทย', # Thai
|
|
|
|
|
'ti' => 'ትግርኛ', # Tigrinya
|
|
|
|
|
'tk' => 'تركمن / Туркмен', # Turkmen
|
2004-06-11 04:50:29 +00:00
|
|
|
'tl' => 'Tagalog', # Tagalog (Filipino)
|
|
|
|
|
#'tlh' => 'tlhIngan-Hol', # Klingon - no interlanguage links allowed
|
|
|
|
|
'tn' => 'Setswana', # Setswana
|
2005-01-30 21:39:32 +00:00
|
|
|
'to' => 'faka-Tonga', # Tonga (Tonga Islands)
|
2004-06-11 04:50:29 +00:00
|
|
|
'tokipona' => 'Toki Pona', # Toki Pona
|
2005-01-30 21:39:32 +00:00
|
|
|
'tp' => 'Toki Pona', # Toki Pona - non-standard language code
|
2004-08-09 22:57:53 +00:00
|
|
|
'tpi' => 'Tok Pisin', # Tok Pisin
|
2005-04-03 20:33:09 +00:00
|
|
|
'tr' => 'Türkçe', # Turkish
|
2004-06-11 04:50:29 +00:00
|
|
|
'ts' => 'Xitsonga', # Tsonga
|
2005-04-03 20:33:09 +00:00
|
|
|
'tt' => 'Tatarça', # Tatar
|
2004-12-02 05:00:11 +00:00
|
|
|
'tum' => 'chiTumbuka', # Tumbuka
|
2005-01-30 21:39:32 +00:00
|
|
|
'tw' => 'Twi', # Twi, (FIXME!)
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'ty' => 'Reo Mā`ohi', # Tahitian
|
2006-05-05 12:36:48 +00:00
|
|
|
'tyv' => 'Тыва дыл', # Tyvan
|
2005-10-24 06:50:54 +00:00
|
|
|
'udm' => 'Удмурт', # Udmurt
|
2004-06-11 04:50:29 +00:00
|
|
|
'ug' => 'Oyghurque', # Uyghur
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'uk' => 'Українська', # Ukrainian
|
|
|
|
|
'ur' => 'اردو', # Urdu
|
|
|
|
|
'uz' => 'Ўзбек', # Uzbek
|
2005-03-13 18:17:47 +00:00
|
|
|
've' => 'Tshivenda', # Venda
|
2005-10-24 06:50:54 +00:00
|
|
|
'vec' => 'Vèneto', # Venetian
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'vi' => 'Tiếng Việt', # Vietnamese
|
2006-03-24 22:10:00 +00:00
|
|
|
'vls' => 'West-Vlaoms', # West Flemish
|
2005-04-07 17:25:37 +00:00
|
|
|
'vo' => 'Volapük', # Volapük
|
2004-06-11 04:50:29 +00:00
|
|
|
'wa' => 'Walon', # Walloon
|
2005-09-25 10:57:51 +00:00
|
|
|
'war' => 'Samar-Leyte Visayan', # Waray-Waray
|
2004-06-11 04:50:29 +00:00
|
|
|
'wo' => 'Wollof', # Wolof
|
2006-01-14 13:11:12 +00:00
|
|
|
'xal' => 'Хальмг', # Kalmyk
|
2004-06-11 04:50:29 +00:00
|
|
|
'xh' => 'isiXhosa', # Xhosan
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'yi' => 'ייִדיש', # Yiddish
|
2005-04-03 20:33:09 +00:00
|
|
|
'yo' => 'Yorùbá', # Yoruba
|
2004-06-11 04:50:29 +00:00
|
|
|
'za' => '(Cuengh)', # Zhuang
|
2005-04-07 17:25:37 +00:00
|
|
|
'zh' => '中文', # (Zhōng Wén) - Chinese
|
Converted entities to their respective literals with the following Perlscript
#!/usr/bin/evn perl
use utf8;
use HTML::Entities;
binmode STDOUT, ":utf8";
@file = <>;
$file = join /\n/, @file;
for $i (0..length $file) {
if ( (substr($file, $i, 1) eq '&') and (substr($file, ($i+1), 1) eq '#') ) {
$eat = 1; # Yummie entities
undef $food;
next;
} elsif ($eat && substr($file, $i, 1) eq '#') {
next;
} elsif ($eat && substr($file, $i, 1) =~ /\d/) {
$food .= substr($file, $i, 1);
next;
} elsif ($eat && substr($file, $i, 1) =~ /;/) {
undef $eat;
$out .= chr($food);
undef $food;
next;
}
$out .= substr($file, $i, 1);
}
$out = decode_entities($out);
print $out;
2005-03-27 02:25:25 +00:00
|
|
|
'zh-cfr' => '閩南語', # Min-nan alias (site is at minnan)
|
|
|
|
|
'zh-cn' => '中文(简体)', # Simplified
|
|
|
|
|
'zh-hk' => '中文(繁體)', # Traditional (Hong Kong)
|
|
|
|
|
'zh-min-nan' => 'Bân-lâm-gú', # Min-nan
|
|
|
|
|
'zh-sg' => '中文(简体)', # Simplified (Singapore)
|
|
|
|
|
'zh-tw' => '中文(繁體)', # Traditional
|
2006-03-24 22:10:00 +00:00
|
|
|
'zh-yue' => '粵語', # Cantonese
|
2005-01-30 21:39:32 +00:00
|
|
|
'zu' => 'isiZulu' # Zulu
|
2004-06-11 04:50:29 +00:00
|
|
|
);
|
2005-03-01 22:05:18 +00:00
|
|
|
?>
|