ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexander Babanov                    2:5020/5609.69 09 Apr 2001  07:06:22
 To : Anton Kudris A.
 Subject : Re: regexp
 -------------------------------------------------------------------------------- 
 

 
  AA>     Hужно написать сабж, который делает следующее:
  AA>     есть строка вида: "aAa,BЭb,ъCC,dDdЯD,eE,f,GКФGШГgggG"
  AA>     т.е. есть записи разделенные запятыми. Hадо проверить, чтобы в
  AA> начале и в конце строки не было зяпятых, чтобы внутри записей не было
  AA> цифр и пробелов (и чтобы вообще не было никаких "лишних" символов,
  AA> кроме букв и запятых).
 
 $s = "aaas,hghghg,jhhjg,kjkj";
 print "ok" if $s =~ /^([a-z]+,)*[a-z]+$/i;
 
  AA> Помогите написать, а то что-то у меня мозги переклинило и уже второй
  AA> день ничего не выходит :(
 
 Разформозишься - разберись с классом "букв" :)
 
 CYa!!!
 
 ЪДВїЪДВВВДДДщщъъ ЪДВВВДї ЪїЪДВДДДДДДДДщщъъ   ЪДДДД 2:5020/5609.69 ДДДї
 іВіАґДЕ ґBabanov іВі ґВі іАґВіST BERSERKER   і babanov@earthlink.net і
 ... Еще наше поколение будет жить при Виагре! [предп. из писем Ильича к HКК]
 ---
  * Origin: Our governor can beat up your governor! (2:5020/5609.69)
 
 

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

Тема:    Автор:    Дата:    regexp   Anton Kudris A.   09 Apr 2001 13:24:49   Re: regexp   Alexander Babanov   09 Apr 2001 07:06:22