ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Igor Nikolaev                        2:5030/266     01 Aug 2000  16:47:13
 To : Ivan Azmanoff
 Subject : Re: Отсечь стpокy
 -------------------------------------------------------------------------------- 
 

 Ivan Azmanoff <Ivan_Azmanoff@p22.f27.n5093.z2.fidonet.org> wrote:
 
 >       Гpомко не бейте, но как чеpез RE отсечь стpокy?
 >       Типа Сишного *strchr(str, '-') = '\0';
 
 Выбирай:
 $str = $` if $str =~ m/-/o;
 $str = ( split '-', $str, -1 ) [0];
 
 split эффективнее, регэкспов много разных можно написать.
 
 -- 
 Игорь Hиколаев
 --- ifmail v.2.12.os.sensi
  * Origin: Бедная строчка )-; (2:5030/266@fidonet)
 
 

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

Тема:    Автор:    Дата:    Отсечь стpокy   Ivan Azmanoff   31 Jul 2000 22:37:15   Re: Отсечь стpокy   Michael Samanov   01 Aug 2000 09:00:32   Re: Отсечь стpокy   Igor Nikolaev   01 Aug 2000 16:47:13