ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Serge Shikov                         2:5020/400     07 Aug 2000  12:19:30
 To : All
 Subject : Re: regexp
 -------------------------------------------------------------------------------- 
 

 Artur Penttinen wrote:
 
 > 
 > > Как перловым регекспом удалить скажем второй TAB в строке?
 > > s/\t// - Удаляет первый
 > > s/t//g -Удаляет все.
 > > Как удалить только второй?
 > 
 >   if ($str =~ m/^(.*?\t.*?)\t(.*)$/) { $str = $1 . $2; }
 
 Б-р-р, а зачем такие сложности-то? Объясни, зачем тут ^, $, и почему не
 использовать s///?
 А if опять же зачем? Ведь тривиальнейший регексп:
 
 $str =~ s/.*?\t.*(\t).*//;
 
 будет IMHO делать ровно тоже самое, причем только тогда, когда
 совпадение будет иметь место. Даже ? кажется не потребуется...
 --- ifmail v.2.15dev5
  * Origin: home (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    Re: regexp   Artur Penttinen   07 Aug 2000 10:53:27   Re: regexp   Serge Shikov   07 Aug 2000 12:19:30   Re: regexp   Artur Penttinen   07 Aug 2000 15:21:57   Re: regexp   Paul Kulchenko   07 Aug 2000 22:11:02   Re: regexp   Serge Shikov   08 Aug 2000 11:17:45   Re: regexp   Artur Penttinen   08 Aug 2000 13:02:51   Re: regexp   Artur Penttinen   08 Aug 2000 11:57:24