- RU.PERL ----------------------------------------------------------- RU.PERL -
Msg : #4011 [671]
От : Serg Ivanov 2:5020/400 09 июля 04, 07:08
Кому : Yury Kopyl 14 июля 04, 22:51
Тема : Re: Ошибка в perl 5.6.1(?)
-------------------------------------------------------------------------------
From: "Serg Ivanov"
Thu Jul 08 2004 19:54, Yury Kopyl wrote to Serg Ivanov:
YK> From: "Yury Kopyl"
YK> Serg Ivanov -> "Re: Ошибка в perl 5.6.1(?)" :
SI>> Thu Jul 08 2004 10:13, Yury Kopyl wrote to Serg Ivanov:
YK>>> From: "Yury Kopyl"
YK>>> Serg Ivanov -> "Ошибка в perl 5.6.1(?)" :
SI>>>> Переводы строк как в юниксе. Дома пишет, что найдено, а на
SI>>>> сервере
SI>>>> у буржуев не найдено. Оказалось, что все дело в .+? и русских
SI>>>> Установка локали, как и следовало ожидать, не помогает.
YK>>> А ты уверен, что на сервере у буржуев есть русская локаль? :)
SI>> Вот еще работающий вариант разделителя (прямо анекдот):
SI>> if (m!^Результат поиска.+?\s{0}сайтов[^<]+(\d+)!m)
SI>> А замена с на \xF1 не помогает:
SI>> if (m!^Результат поиска.+?\xF1айтов[^<]+(\d+)!m)
SI>> Что скажут местные светила?
YK> Ты лучше покажи как ты локаль высталяешь
use POSIX qw(locale_h);
use locale;
setlocale(LC_CTYPE, "ru_RU.cp1251");
А как она на это все влияет?
--- ifmail v.2.15dev5.3
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/400)