|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Belousov Oleg 2:5020/400 29 May 2002 10:01:39 To : All Subject : разбить слово по слогам (regexp) -------------------------------------------------------------------------------- Здравы будьте! Хочу сделать простейший сабж пока так $word = s/(.*?)([аеиоуыэюя])(?![аеиоуыэюя])/$1$2$3-/gi; Hо не так работает... $3 не вставляется Олег. --- ifmail v.2.15dev5 * Origin: JS "UnicomTechService" (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/20797ecf2b3e.html, оценка из 5, голосов 10
|