Авторизация:
ПРОЕКТЫ ДАННОЙ КАТЕГОРИИ


Все проекты данной категории  -  83


TOP 10 ФРИЛАНСЕРОВ

Скрипты / Web-приложения

1EdWood
(35.3)
2artzavod
(31.7)
3bw
(27.0)
4softfacade
(22.5)
5Pilat66
(22.0)
6AlexWeb
(21.2)
7EgorovAlexey
(18.0)
8inpego
(15.8)
9parse
(14.9)
10Alwake
(13.9)

Исправить часть кода Perl скрипта

Скрипты / Web-приложения
Заказчик:
Фотография / Юзерпик
ОффлайнJevgenij Petrov (jpetrov)
(3.1)
В сервисе: 4 года 9 месяцев  |  Отзывы: 5
Бюджет: Не определен
Приём предложений: 21.05.2006 - 21.05.2006
Статистика: Предложения: 1  |  Просмотры: 339 (2 пользователя)
Статус: Закрыт
Есть слудующий кусок кода:
if ($cookies{'lng'} ne 'ru' and $cookies{'lng'} ne 'us' and $cookies{'lng'} ne 'lt')
{
if ($ENV{'HTTP_ACCEPT_LANGUAGE'} =~ /ru/) { $cookies{'lng'}='ru'; }
elsif ($ENV{'HTTP_ACCEPT_LANGUAGE'} =~ /lt/) { $cookies{'lng'}='lt'; }
else { $cookies{'lng'}=$init{'dconfig'}{'DefaultLNG'}; }

}
Надо исправить так чтобы, если пользователь заходит на домен .com и 'HTTP_ACCEPT_LANGUAGE' не ru и не lt, то $cookies{'lng'}='en', а если пользователь заходит на домен .ru, и 'HTTP_ACCEPT_LANGUAGE' не en и не lt, то $cookies{'lng'}='ru'

Оплата после завершения, сдачи и проверки работ.

Предложения фрилансеровRSS-трансляция

Статус:  активные  |  отклоненные
Пользователь / Рейтинг Сумма Сроки Дата публикации
Фотография / Юзерпик
ОффлайнNab (nab)

В сервисе: 2 года 8 месяцев
? - 21.05.2006 в 08:19
If ($ENV{'HTTP_HOST'} =~ /.*.com$/ and not $ENV{'HTTP_ACCEPT_LANGUAGE'} =~ /en/) { $cookies{'lng'}='en' }
elsif ($ENV{'HTTP_HOST'} =~ /.*.ru$/ and not $ENV{'HTTP_ACCEPT_LANGUAGE'} =~ /ru/) { $cookies{'lng'}='ru' }
else { $cookies{'lng'}=$init{'dconfig'}{'DefaultLNG'} }

Вот самое простое и в том же стиле :)
И я на всякий случай оставил значение по умолчанию, потому как вдруг никакое выражение не выполниться... если что, последнюю строку можно вообще убрать.