Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/371.32  20 Nov 2000  16:27:07
 To : dmitriy@genphys.phys.msu.su
 Subject : Re: 4 разных ответа на Re: Perl and Russian word и еще один вопрос.
 -------------------------------------------------------------------------------- 
 
 AM>> Как научить перл тому, что Вася_Пупкин - это
 AM>> слово(\w+)?
 AM>> Чтобы можно было использовать русские в строках и
 AM>> применять к ним
 AM>> операции с регулярными выражениями.
 dgpms> 1.
 
 dgpms> $str="Услышал the user Вася Пупкин как его сисадмины is very good любят";
 dgpms> $str=~s/!?\w//ig;
 dgpms> $str="Услышал  Вася Пупкин как его сисадмины   любят";
 
 dgpms> 2.
 dgpms> $str=~s/!?\W//ig;
 dgpms> $str="the user is very good";
 dgpms> 3.
 dgpms> $str =~ s|(\w)|ord($1) > 127 ? "" : $1|ge; это из одного форума..
 dgpms> это будет, как говорят, работать при правильной локали(что такое
 dgpms> правильная локаль?) 4. $stroka =~ s|(.)|ord($1) > 127 ? "" : $1|ge;
 dgpms> оттуда-же, говорят что побъет все
 
 dgpms> символы, вне зависимости от локали
 
 dgpms> Такие мысли.
 
 Забудь и не путай человека.
 
 dgpms> Hарод, меня тут озадачили вопросом.
 dgpms> Есть файл $file="/usr/local/file.txt";
 dgpms> стандартно open AAA, "<$file"; @mass=<AAA>; close AAA; - если $file
 dgpms> весит 50 мегов, то все 50 в память запишутся(или не запишутся, зависит
 dgpms> от оперативки на сервере).  Вопрос, каким образом читать файл построчно
 dgpms> например, конечно, в таком случае скорость обмена информацией будет
 dgpms> зависеть от скорости работы винчестера на сервере, но при наших каналах
 dgpms> винчестеры работают супербыстро. Как файл считывать построчно(используя
 dgpms> в качестве разделитея символ перевода каретки), допустим считал с винта
 dgpms> ^лалала$ следующую строчку так-же считал с винта, и так все 50 мегов.
 
 Стандартно не то, что ты написал, а 
 
 open AAA, "<$file";
 while(<AAA>) {
   ...
 }
 close AAA;
 
 Оно же и решает поставленную тобой задачу. А тормоза при обмене с винчестером
 должны волновать не тебя, а автора операционки. Там все равно кэш.
 
 -- 
 Счастливо!
   Ран.
 --- ifmail v.2.14.os-p7-tma3
  * Origin: MemoNet (2:5020/371.32@fidonet)
 
 

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

 Тема:    Автор:    Дата:  
 Re: 4 разных ответа на Re: Perl and Russian word и еще один вопрос.   Artem Chuprina   20 Nov 2000 16:27:07 
Архивное /ru.perl/17121f6dd125c.html, оценка 2 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional