Forum Webscript.Ru
Программирование => Perl => Тема начата: YYYn от 01 Сентября 2002, 13:10:47
-
Есть скриптик, который отправляет ПОСТ запрос, получает ответ и выводит его на экран.
# Create a user agent object
use LWP::UserAgent;
$ua = new LWP::UserAgent;
$ua->agent("AgentName/0.1 " . $ua->agent);
# Create a request
my $req = new HTTP::Request POST => \'http://www.perl.com/cgi-bin/BugGlimpse\';
$req->content_type(\'application/x-www-form-urlencoded\');
$req->content(\'match=www&errors=0\');
# Pass request to the user agent and get a response back
my $res = $ua->request($req);
# Check the outcome of the response
if ($res->is_success) {
print $res->content;
} else {
print "Bad luck this time\\n";
}
Вопрос №1:
Как вывести ответ не просто на экран, а допустим в "iframe" или сделать на него ссылку "a href"?
Вопрос №2:
Кому не сложно, объясните "на пальцах", что делает оператор "-> стрелка", а то в умных доках больно все заумно объясняется.
С модулями CPAN до сих пор не связывался, а теперь сложно въехать.
-
Как вывести ответ не просто на экран, а допустим в "iframe" или сделать на него ссылку "a href"?
В определении iframe в качетве src ставишь ссылку на твой скрипт, ссылку - в href УРЛ скрипта.
Кому не сложно, объясните "на пальцах", что делает оператор "-> стрелка", а то в умных доках больно все заумно объясняется.
В отношении классов -> производит разыменование методов и свойств данного класса. То есть, если проще, ты пишешь своеобразный адрес до подпрограммы или переменной класса.
-
Кому не сложно, объясните "на пальцах", что делает оператор "-> стрелка", а то в умных доках больно все заумно объясняется.
С модулями CPAN до сих пор не связывался, а теперь сложно въехать
http://www.dklab.ru/chicken/nablas/21.html
http://www.dklab.ru/chicken/nablas/22.html
-
В определении iframe в качетве src ставишь ссылку на твой скрипт, ссылку - в href УРЛ скрипта.
Сенкс, не догадался. А есть ли другие способы? Чтобы не вызывать скрипт, который вызывает скрипт.....
http://www.dklab.ru/chicken/nablas/21.html
http://www.dklab.ru/chicken/nablas/22.html
А если еще проще? Нууу, скажем, чем можно заменить стрелку? И потом не думать, чем отличается
$a = $A->[10]{abc}[0]{d};
от
$a = $${A[10]{abc}[0]{d}};
и почему "доллар" заменяет стрелку.