ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : John Lepikhin                        2:5070/156     10 Jul 2002  00:53:38
 To : Soft
 Subject : Re: неразличение регистра в регедиксах (i)
 -------------------------------------------------------------------------------- 
 

 Приветствую, Soft.
 
 !> On 05 Jul 02 22:29:09 +0900, Soft -> Всем:
 
  S> Почему i не работает с русскими буквами и как эту проблему решить?
 
         Рассказать интерпритатору, что такое русские буквы.
 
 use locale;
 use POSIX qw(locale_h);
 setlocale(LC_ALL,"ru_RU.KOI8-R");
 #                 ~~~~~~~~~~~~ выставить соответствующую локаль
 
  S> if($name1=~/$name2/i) {print "регистр не учитывается"}
 
 [skip]
 
         BTW, конструкция $var1=~/$var2/ достаточно медленна.
 Простейший вариант - используй вместо этого:
 
         if(eval "\$name1=~/$name2/i")
 -- 
 ... [лесные компьютерщики] {Regnum Morganae}
 --- Gnus/5.0808 (Gnus v5.8.8) XEmacs/21.1 (Cuyahoga Valley)
  * Origin: A poorly-installed InterNetNews site (2:5070/156.0)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    неразличение регистра в регедиксах (i)   Soft   05 Jul 2002 22:29:09   неразличение регистра в регедиксах (i)   Dmitry Diskin   09 Jul 2002 18:42:06   неразличение регистра в регедиксах (i)   Victor Chuchupal   09 Jul 2002 19:43:30   Re: неразличение регистра в регедиксах (i)   John Lepikhin   10 Jul 2002 00:53:38