<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Tahoma
}
--></style></head>
<body class='hmmessage'><div dir='ltr'>
Opa Breno, tudo joia?? Na verdade eu não tentei com o Windows pois desde a versão Windows XP sp2 não tem suporte a RawSockets (uma questão de segurança, segundo a Microsoft).<br>Mas como havia viajado, fiquei sem tempo, então ontem quando voltei eu usei a versão do Bruno e deu erro tambem, então pela segunda vez eu reinstalei a libpcap, e por algum motivo mistico funcionou. :D <br>A medida que for concluindo etapas do que estou desenvolvendo vou compartilhar com a comunidade Perl.<br><br><br><br><div><div id="SkyDrivePlaceholder"></div>> Date: Sun, 22 Apr 2012 23:22:57 -0300<br>> From: breno@rio.pm.org<br>> To: rio-pm@pm.org<br>> Subject: Re: [Rio-pm] Problemas com rawsocket<br>> <br>> bbuss++ # ótimas respostas, parabéns!<br>> <br>> Aureliano, depois nos conte se teve algum problema em rodar a versão<br>> do Bruno no Windows. O Net::RawIP não oferece suporte a Windows nos<br>> métodos de manipulação de ethernet, então algumas coisas podem não<br>> rodar bem. Você tá usando a Winpcap 4.1.2? Ou outro mais<br>> antigo/diferente?<br>> <br>> Se está brincando com isso, pode experimentar também o<br>> Win32::NetPacket => https://metacpan.org/module/Win32::NetPacket<br>> <br>> []s<br>> <br>> -b<br>> <br>> On Fri, Apr 20, 2012 at 9:39 PM, Bruno Buss <bruno.buss@gmail.com> wrote:<br>> > Ola Aureliano,<br>> ><br>> > Então... testei aqui com chamando com "sudo perl script.pl 127.0.0.1 7201" e<br>> > ele executou sem nenhum problema.<br>> > Aqui está todo o código como está aqui na minha<br>> > máquina: https://gist.github.com/2432871<br>> ><br>> > [ ]'s<br>> ><br>> > 2012/4/20 Bruno Buss <bruno.buss@gmail.com><br>> >><br>> >> Aureliano,<br>> >><br>> >> 2012/4/20 Aureliano Guedes <guedes_1000@hotmail.com><br>> >>><br>> >>> Sei que aqui tem muitas pessoas gentis, mas abro mão e não desejo mais<br>> >>> ajuda, pois percebo que estou incomodando pessoas tão bem instruidas como<br>> >>> Mantovani.<br>> >><br>> >><br>> >> De boa cara... não vamos começar com drama aqui não.<br>> >> Vamos resolver o problema...<br>> >><br>> >>><br>> >>> Ainda me retornou o erro:<br>> >>><br>> >>> Use of uninitialized value $daddr in pattern match (m//) at<br>> >>> /usr/lib/perl5/Net/RawIP.pm line 481, <> line 1.<br>> >><br>> >><br>> >> Essa é fácil! =P<br>> >> Mesmo problema do caso anterior:<br>> >> " daddr => &target,"<br>> >><br>> >> Troque por:<br>> >> " daddr => $self->{TARGET},"<br>> >><br>> >><br>> >>><br>> >>> Use of uninitialized value in subroutine entry at<br>> >>> /usr/lib/perl5/Net/RawIP.pm line 626, <> line 1.<br>> >>> Use of uninitialized value in subroutine entry at<br>> >>> /usr/lib/perl5/Net/RawIP.pm line 626, <> line 1.<br>> >><br>> >><br>> >> Na sua sub send, logo depois de você fazer<br>> >> "my $size = PacksSize->new;"<br>> >><br>> >> Coloque um:<br>> >> say "TARGET = $self->{TARGET}";<br>> >> say "PORT = $self->{PORT}";<br>> >><br>> >> Só para fins de debug =P<br>> >><br>> >><br>> >> E depois cole seu código atual em um pastebin da vida, para facilitar a<br>> >> conversa :)<br>> >><br>> >> [ ]'s<br>> >> --<br>> >> Bruno C. Buss<br>> >> http://www.brunobuss.net<br>> ><br>> ><br>> ><br>> ><br>> > --<br>> > Bruno C. Buss<br>> > http://www.brunobuss.net<br>> ><br>> > _______________________________________________<br>> > Rio-pm mailing list<br>> > Rio-pm@pm.org<br>> > http://mail.pm.org/mailman/listinfo/rio-pm<br>> _______________________________________________<br>> Rio-pm mailing list<br>> Rio-pm@pm.org<br>> http://mail.pm.org/mailman/listinfo/rio-pm<br></div> </div></body>
</html>