Есть скриптик, который отправляет ПОСТ запрос, получает ответ и выводит его на экран.
# 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 до сих пор не связывался, а теперь сложно въехать.
