![]() |
|
Модераторы: korob2001, ginnie |
![]()
|
|
| Dolik |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 6 Регистрация: 7.1.2005 Репутация: нет Всего: нет |
Здравствуйте, как мне переделать данный скрипт для оставления сообщения в гостевой на удаленном хосте с метода GET на POST!!!
use LWP::Simple; my $url = 'http://rota35.boom.ru/servletGuestBook?action=view&id=33076235'; #URL гостевой на удаленном хосте my $form1= 'from'; # имя поля формы my $form2 = 'comment'; # имя поля формы my $val1= 'Dolik'; # значение поля формы my $val2 = 'Eto soobschenie poslano skriptom, esli ono doshlo znachit skript rabotaet'; # значение поля формы my $req = $url."&".&c_str($form1 => $val1, $form2 => $val2); sub c_str{ my %_data=map { s/([^0-9a-z])/sprintf("%%%x", ord($1))/egi;$_; } @_; my $_out; for ( keys %_data ){ $_out.="&" if ($_out); $_out.=$_."=".$_data{$_}; } return $_out; } get($req); |
|||
|
||||
| korob2001 |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 2871 Регистрация: 29.12.2002 Репутация: 13 Всего: 61 |
Если сообщение заполняется в форме, то просто укажи method="POST" тега form и action="адрес своей гостевой". Все параметры которые не зависят от ввода пользователя, такие как id и action, передавай в скрытых полях. Хотя всё не так просто, так как у твоей гостевой может быть проверка, с какого хоста был сделан запрос и если он не совпадает с текущим, то она(программа), просто, его(запрос) игнорирует.
-------------------- "Время проходит", - привыкли говорить вы по неверному пониманию. "Время стоит - проходите вы". |
|||
|
||||
![]()
|
| Правила форума "Perl: CGI программирование" | |
|
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Perl: разработка для Web | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |