No seu Computador:<br><code><br>#!/usr/bin/perl<br><br>use strict;<br>use warnings;<br>use LWP::UserAgent;<br>use HTTP::Request;<br><br>my $url = '<a href="http://localhost">http://localhost</a>';<br>my $agent = LWP::UserAgent->new( agent => 'Monk' );<br>
my $request = HTTP::Request->new( 'GET' => $url );<br>my $response = $agent->request($request);<br>my $content = $response->content();<br></code><br><br>Computador do Cliente: nc -l -p80 -vv<br>
<br>Você deve usar WWW::Mechanize:<br><a href="http://search.cpan.org/~petdance/WWW-Mechanize-1.54/lib/WWW/Mechanize.pm">http://search.cpan.org/~petdance/WWW-Mechanize-1.54/lib/WWW/Mechanize.pm</a><br><br>Ou deve usar LWP::Curl:<br>
<a href="http://search.cpan.org/~lorn/LWP-Curl-0.06/lib/LWP/Curl.pm">http://search.cpan.org/~lorn/LWP-Curl-0.06/lib/LWP/Curl.pm</a><br><br>Existem vários módulos para isso, o Mechanize simula um navegador, e o LWP::Curl é rápido.<br>
<br><div class="gmail_quote">2009/4/1 Steven Koch <span dir="ltr"><<a href="mailto:stevenkoch@surfih.com">stevenkoch@surfih.com</a>></span><br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Viva Pessoal,<div><br></div><div>Existe alguma maneira de adicionar o header request do browser do cliente em um pedido do LWP para simular e receber os dados(EX: COOKIES) que normalmente viria se fosse o browser que requerisse?</div>
<div><br></div><div>Preciso fazer um serviço de single sign-on.</div><div><br></div><div><br></div><div>OFF topic but ON list: Farei o possivel para ir ao Meeting. Sério! : )</div><div><br>-- <br>Com os melhores cumprimentos,<br>
Steven Koch<br>Sistemas de Informação<br> <br>E-mail: <a href="mailto:stevenkoch@surfih.com" target="_blank">stevenkoch@surfih.com</a><br><br>Rua Augusto Machado 13A 3F<br>2825-307 Costa da Caparica - Portugal<br><br>Móvel: +351 917 169 615<br>
<br><a href="http://www.surfih.com" target="_blank">http://www.surfih.com</a><br><br>
</div>
<br>_______________________________________________<br>
Cascavel-pm mailing list<br>
<a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br></blockquote></div><br><br clear="all"><br>-- <br><a href="http://mantovanihouse.blogspot.com/">http://mantovanihouse.blogspot.com/</a><br>
This is my poney:<br>-------(\_------------_/)-----------<br>-------)--(----------)--(-----------<br>------(----(---------)----)----------<br>-------)----(-------)----(-----------<br>-------(----(-------)----)-----------<br>
--------\_-(\\.---.//)-_/------------<br>----------\)' -8--8- '(/--------------<br>-----------/------------\---------------<br>----------(--)--------(--)--------------<br>------------(_c__c_)----------------<br>----------------------------------------<br>