смена языков в скрипте

[ActiveAir]

есть скрипт "А" - на английском, есть он же "Р" - на русском.
вопрос, как сделать, чтоб ру-пользователям выдавался вариант "Р", а не русским - вариант "А"? ну и кнопочка перехода чтоб тоже была на всяк случай....

[Rivvin]

Ну считывай IP пользователя при входе на сайт. Если он из Российской зоны то перенаправляй на русский скрипт, если другой то на английский

[umka]

Сообщение от Rivvin

Ну считывай IP пользователя при входе на сайт. Если он из Российской зоны то перенаправляй на русский скрипт, если другой то на английский

некрасиво ...
красивый пример на ПэХэПэ:

PHP код:

$locale=strtolower(substr($_SERVER['HTTP_ACCEPT_LANGUAGE'],0,2));
if ($locale!="ru") {
 $locale="en";
}
// ... а дальше уже вызываем нужный скрипт 


[ActiveAir]

всем спасибо, вопрос решен.

[Expert]

А на Perl это как будет выглядеть?

[umka]

Сообщение от Expert

А на Perl это как будет выглядеть?

ну видимо как-то так :))

$locale=lc(substr($ENV{'HTTP_ACCEPT_LANGUAGE'},0,2));
if ($locale!="ru") {
  $locale="en";
}
// ... а дальше уже вызываем нужный скрипт