ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Aleksandr Guidrevitch                2:5020/400     07 Dec 2000  05:57:16
 To : All
 Subject : regexp-ы
 -------------------------------------------------------------------------------- 
 

 *This message was transferred with a trial version of CommuniGate(tm) Pro*
 Доброе время суток, All,
 
   есть задача - посчитать количество слов в переменной.
   Поскольку переменная получена из формы, поля типа textarea, то может
   сожержать непредвиденные %0[dD]. %0[aA] предварительно выкоцываются,
   и остаются только %0[dD]. Собственно надо посчитать количество
   слов, учитывая что 0[dD] не являются словами, то есть грубо говоря:
 
   $count++ while (/\b\w+\b/g);
   $count-- while (/%0[dD]/g);
 
   Можно ли в одну строчку сие забомбить (с объяснением если можно)?
   Или лучше так оставить ?
 
 ... I like kids, but I don't think I could eat a whole one ...
  
 С уважением
  Aleksandr                          mailto:alexandr@eye.subnett.no
 -- 
 Отправлено через сервер Talk.Ru - http://www.talk.ru
 --- ifmail v.2.15dev5
  * Origin: Talk.Ru (2:5020/400)
 
 

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