Forum Webscript.Ru

Программирование => Perl => Тема начата: Inecs от 06 Февраля 2006, 19:32:47

Название: Ну очень интересный вопрос
Отправлено: Inecs от 06 Февраля 2006, 19:32:47
Сабж!
Скажем, у нас есть в переменной $data какая-то html страница, есть другая переменная, в которой содержиться id сессии ($sid). Как можно ко всем ссылкам на странице, которые содержат имя домена (скажем pupkin.com), в зависимости от последнего символа в ссылке, подставить вот что:

Ссылка, которая содержится в $data:
http://pupkin.ru/test.pl?qwe=qwe
Подставить:
http://pupkin.ru/test.pl?qwe=qwe&$sid

Ссылка, которая содержится в $data:
http://pupkin.ru/test.pl?qwe=qwe&abc=abc
Подставить:
http://pupkin.ru/test.pl?qwe=qwe&abc=abc&$sid

Ссылка, которая содержится в $data:
http://pupkin.ru/test.pl
Подставить:
http://pupkin.ru/test.pl?$sid

и так далее…

А так же, если найден тег содержащий слово form, то после него подставить скрытое поле  

Просто если написать данный парсер, тогда можно будет не терять посетителей без куков. Исходник я потом выложу на всеобщее обсуждение. Вот застрял на этом парсере и всё. ПОМОГИТЕ ЧЕМ МОЖИТЕ! Спасибо!
Название: Ну очень интересный вопрос
Отправлено: Chs от 09 Февраля 2006, 17:28:37
perldoc perlre