C
CLSAMG
Уважаемые форумчане прошу Вашей помощи!
Дан текст найти все слова начинающиеся с приставки ПРИ- и ПРЕ-.
Что смог написать:
Выводит не все слова, помогите оптимизировать скрипт.
Дан текст найти все слова начинающиеся с приставки ПРИ- и ПРЕ-.
Что смог написать:
Код:
$txt = "вы пригород прогород преступление ПрИвао яма пророк не ПРИВЕТ ПРИ\\\ при делах, запри дверь запредельно";
@res=$txt=~/\s((при|пре)[А-ПР-Яа-пр-я]+)/g;
print "@res\n";
Выводит не все слова, помогите оптимизировать скрипт.