<html>
<head>
<style>
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Verdana
}
</style>
</head>
<body class='hmmessage'>
<br>oi pessoal, <br><br>&nbsp;To precisando manipular FORMS&nbsp; pra fazer consultas automaticas na web, to tentando usar o modulo : <br><br>Mechanize - http://search.cpan.org/~petdance/WWW-Mechanize-1.54/lib/WWW/Mechanize.pm<br><br>montei o script de exemplo :<br><br>&nbsp; #!usr/bin/perl<br>&nbsp; use strict;<br>&nbsp;use warnings;<br>&nbsp;use WWW::Mechanize;<br><br><br>&nbsp;my&nbsp; $google = WWW::Mechanize-&gt;new();<br><br>&nbsp;my&nbsp; $url='http://www.google.com.br';<br><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; $google-&gt;get($url);<br><br>&nbsp;my $busca = $google-&gt;content();&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <br>&nbsp;<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; print $busca, "\n";<br><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; print "**********FORMS ************\n\n";<br><br>&nbsp;my @ref = $google-&gt;forms();<br><br><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; print @ref;<br><br><br><br>O ULTIMO PRINT RETORNA :&nbsp; HTML::Form=HASH(0x85ac988);<br><br>o metodo forms() retorna uma lista de forms, nao entendi esse HASH, &nbsp; se alguem souber como obter os forms agradeco !!<br><br><br><br><br><br><br><br><br><br>- - - - - - - -- - - - - -- - - - -- - - - -- - - -- - - -- - -<br><br>Denilson S. de Andrade<br>&nbsp;UFV - Universidade Federal de Viçosa <br>
<a href="mailto:denilson.andrade@ufv.br">denilson.andrade@ufv.br</a><br><br><br><br><br /><hr />Quer saber qual produto Windows Live combina melhor com o seu perfil? <a href='http://www.windowslive.com.br' target='_new'>Clique aqui e descubra!</a></body>
</html>