%languagenames = ("English" => "en",
                  "Indonesian" => "id",
                  "Chinese"    => "zh",
                  "Danish"     => "da",
                  "German"     => "de",
                  "Spanish"    => "es",
                  "Esperanto"  => "eo",
                  "French"     => "fr",
                  "Italian"    => "it"
                  "Creole"     => "cpf",
                  "Dutch"      => "nl",
                  "Norwegian"  => "no",
                  "Polish"     => "pl",
                  "Portuguese" => "pt"
                  "Russian"    => "ru",
                  "Finnish"    => "fi",
                  "Swedish"    => "sv",
                  "Turkish"    => "tr");

##</code><code>##

%language = $languagenames{$languagename};