ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Kirill Frolov                        2:5030/1123.8  05 Jun 2004  13:38:21
 To : Andrei Protasovitski
 Subject : Re: Первые/последние n слов.
 -------------------------------------------------------------------------------- 
 

 
 On Fri, 28 May 04 14:49:13 +0400, Andrei Protasovitski wrote:
 
  AP> Как проще всего выделить из строки первые/последние n слов?
 
  Примерно так:
 
   s/^((\W*(\w+)){$n}).*/$1/ && s/\W+/ /g
   s/.*(((\w+)\W*){$n})$/$1/ && s/\W+/ /g
 --- [ZX]
  * Origin: 0D00 1E54 41D1 9753 3F41 40F7 4BBA 050B 30E8 0E4E (2:5030/1123.8)
 
 

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