VPF::регэксп помсотрите плиз - Форум программистов

xtrasns

Дата 7.1.2008, 07:44 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 38
Регистрация: 13.5.2007

Репутация: нет
Всего: нет

Была цель выдрать из HTML страницы 10 слов перед корнем "объектив", само слово, и 4 слова после корня.

вот код который я использую для регекспа:

Код


$content =~ /((([А-Яа-я]+)([\s]+)){10})($key([А-Яа-я]+))([\s]+)((([А-Яа-я]+)([\s]+)){4})/;

но к сожеланею получаю фразу "века астрология и связанные с ней теории часто не
получали" вместо фразы "века астрология и связанные с ней теории часто не
получали объективного освещения и даже просто"

В чем ошибка ?

Вот код целиком

Это сообщение отредактировал(а) xtrasns - 8.1.2008, 09:09

ginnie

Дата 7.1.2008, 09:30 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 1287
Регистрация: 6.1.2008
Где: Москва

Репутация: 38
Всего: 49

Уважаемый xtrasns, не хватает внешних круглых скобок, чтобы в $1 попадали все найденные слова. У Вас в $1 попадает только левая часть до слова "объектив".

Немного модифицированный вариант

Код


$content =~ /((?:[А-Яа-я]+[\s]+){10}$key[А-Яа-я]+[\s]+(?:[А-Яа-я]+[\s]+){4})/;

--------------------

Написать код, понятный компьютеру, может каждый, но только хорошие программисты пишут код, понятный людям. (Мартин Фаулер. Рефакторинг)

xtrasns

Дата 7.1.2008, 21:30 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 38
Регистрация: 13.5.2007

Репутация: нет
Всего: нет

спасибо, ждинни, все заработало !

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Общие вопросы \| Следующая тема »