|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Maxim Yemelyanov 2:5020/400 01 Apr 2003 19:40:12 To : All Subject : одним регекспом --------------------------------------------------------------------------------
Hello, All!
Файл faq.txt в формате
Q: ....
A: ....
Можно ли одним регекспом его загнать в массив?
Если
while ($faq =~ /Q:(.*?)A:(.*?)(?=Q:)/sg) { push @FAQ, [$1, $2]; }
, то последняя пара Q-A не попадает.
Есть ли "честный" регексповый способ кроме $faq.='Q:' перед циклом?
--
Regards!
Maxim Yemelyanov, maxim-at-enigmasoft.com.ua, ICQ: 12253836
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5
* Origin: Enigma Soft (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/1312619c2a626.html, оценка из 5, голосов 10
|