Re: [знатокам per l] русский в регулярных в ыражениях (bug#486877)

2010-11-06 Thread Dmitry E. Oboukhov

VW> Надо до первого print добавить  binmode STDOUT,":utf8";

вместе с директивой use utf8; хорошо применять директиву 
use open qw(:std :utf8);

если планируется какой-то ввод-вывод в/из std

-- 
... mpd is off

. ''`.   Dmitry E. Oboukhov
: :’  :   email: un...@debian.org jabber://un...@uvw.ru
`. `~’  GPGKey: 1024D / F8E26537 2006-11-21
  `- 1B23 D4F8 8EC0 D902 0555  E438 AB8C 00CF F8E2 6537


signature.asc
Description: Digital signature


Re: [знатокам per l] русский в регулярных в ыражениях (bug#486877)

2010-11-06 Thread Dmitry E. Oboukhov
YK> Угум, теперь правильно. Осталось побороть привязку к utf8.
YK> Но неужели всё так действительно через ...?

ты хочешь чтобы в любой локали русский был, правильно я тебя понимаю?

тогда примерно так:

1. определяешь кодировку локали
2. затем делаешь для STD-потоков binmode STDIN => ':encoding(кодировка)'

далее скрипт продолжает работать как работал в utf8, а вывод уже самим
perl'ом конвертится


как-то так


хотя хороший метод - байтовые кодировки из принципа не поддерживать.
пусть переходят на utf

-- 
... mpd is off

. ''`.   Dmitry E. Oboukhov
: :’  :   email: un...@debian.org jabber://un...@uvw.ru
`. `~’  GPGKey: 1024D / F8E26537 2006-11-21
  `- 1B23 D4F8 8EC0 D902 0555  E438 AB8C 00CF F8E2 6537


signature.asc
Description: Digital signature


Re: [знатокам per l] русский в регулярных в ыражениях (bug#486877)

2010-11-07 Thread Dmitry E. Oboukhov
VW>>> Надо до первого print добавить  binmode STDOUT,":utf8";
>> 
>> вместе с директивой use utf8; хорошо применять директиву
>> use open qw(:std :utf8);

VW> На самом деле надо

VW> use open qw(:std :locale);

а, даже вот так :)

-- 
... mpd is off

. ''`.   Dmitry E. Oboukhov
: :’  :   email: un...@debian.org jabber://un...@uvw.ru
`. `~’  GPGKey: 1024D / F8E26537 2006-11-21
  `- 1B23 D4F8 8EC0 D902 0555  E438 AB8C 00CF F8E2 6537


signature.asc
Description: Digital signature