Select Code to Download

%languagenames = ("English" => "en",
                  "Indonesian" => "id",
...
                  "Finnish"    => "fi",
                  "Swedish"    => "sv",
                  "Turkish"    => "tr");

%language = $languagenames{$languagename};