Salve mongers! Meus amigos estou com dificuldade para usar o WWW::Mechanize em um determinado site, meu cliente quer que eu capture as informações do mesmo para integrar em seu sistema, mas estou encontrando muita dificuldade, eu usei muito pouco o módulo WWW::Mechanize. Então vamos lá:<div>
<br><div>Quando faço a requisição, no server de teste do Catalyst me retorna:</div><div><div>[error] Caught exception in engine "Wide character in syswrite at /home/lucas/perl5/perlbrew/perls/perl-5.16.1/lib/5.16.1/x86_64-linux/IO/Handle.pm line 478, <DATA> line 1000."</div>
</div><div><br></div><div>E no navegador me retorna:</div><div><span style="font-family:Helvetica,Arial,sans-serif;font-size:13px;line-height:18px;background-color:rgb(255,255,255)">Erro 354 (net::ERR_CONTENT_LENGTH_MISMATCH): O servidor encerrou a conexão inesperadamente.</span></div>
<div><br></div></div><div>O código:</div><div><div>my $mech = WWW::Mechanize->new;</div><div>$mech->get('<a href="http://www.jusbrasil.com.br/legislacao/busca?q=usucapi%C3%A3o&s=legislacao'">http://www.jusbrasil.com.br/legislacao/busca?q=usucapião&s=legislacao'</a>);</div>
<div>my $valor = $mech->content;</div></div><div>$c->res->body("$valor");</div><div><br></div><div>Alguém pode ajudar ou me indicar o que devo fazer.</div><div><br></div><div>Obrigado.</div>