|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Kostya Altuhov 2:5030/181 27 Nov 2002 11:15:51 To : Artem Chuprina Subject : Проблемы с логикой регулярных выражений --------------------------------------------------------------------------------
25 Nov 02 18:43, to Alexey Sheynuk wrote Artem Chuprina:
AS>>>>> Я не знаю почему (случайно получилось), но ниже приведённый
AS>>>>> regexp работает так, как тебе надо. $txt =~
AS>>>>> /(?:(abra\d).+?)+myexp/;
AS>>>> еще вариант:
AS>>>> $txt =~ /.*(abra\d)+.*myexp.*/;
Плюсик не нужен:
$txt =~ /.*(abra\d).*myexp/;
Поскольку первый .* greedy, матчиться всегда будет последний abra перед myexp.
Если нужно выкусить abra:
$txt =~ s/(.*)abra\d(.*myexp)/$1$2/;
Kostya
---
* Origin: let out the killer in me! (2:5030/181)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/133803de49c30.html, оценка из 5, голосов 10
|