ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : John Lepikhin                        2:5070/156     12 Feb 2003  13:23:20
 To : All
 Subject : заглавные буквы
 -------------------------------------------------------------------------------- 
 

 
         Сижу, балуюсь. А вот можно-ли красивее написать такое
 преобразование (все слова строки с большой буквы):
 
 $s = 'tHeRe\'S no pLAce liKe HOme';
 $s =~ s/(^| )(\w)([^ ]*)/$1.uc($2).lc($3)/ge;
 
         ?
 -- 
 ... [болотный сисоп] {микроволновка - печка-буржуйка?}
 --- Gnus/5.0808 (Gnus v5.8.8) XEmacs/21.4 (Common Lisp)
  * Origin: Karacidum (2:5070/156.0)
 
 

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