$data =~ s/\w+/$w=$&;$r='';$w=~s|.|$r=$&.$r|ge;$r/ge;
А если серьезно, циклом выдирай из текста слова и каждое слово читай вложенным циклом наоборот (у VirtUX-а можешь стырить код чтения наоборот).
Кстати, если нужен юникод, будет веселее ))
Найден 1 результат
- 30.09.2010 18:20:55
- Форум: Общее
- Тема: программа для вывода правильных слов
- Ответы: 5
- Просмотры: 13081
Re: программа для вывода правильных слов
Да тут делов на одну простую регулярочку
$data =~ s/\w+/$w=$&;$r='';$w=~s|.|$r=$&.$r|ge;$r/ge;
А если серьезно, циклом выдирай из текста слова и каждое слово читай вложенным циклом наоборот (у VirtUX-а можешь стырить код чтения наоборот).
Кстати, если нужен юникод, будет веселее ))
$data =~ s/\w+/$w=$&;$r='';$w=~s|.|$r=$&.$r|ge;$r/ge;
А если серьезно, циклом выдирай из текста слова и каждое слово читай вложенным циклом наоборот (у VirtUX-а можешь стырить код чтения наоборот).
Кстати, если нужен юникод, будет веселее ))