[Rio-pm] Problemas com rawsocket

[Bruno Buss]

Aureliano,

2012/4/20 Aureliano Guedes <guedes_1000 em hotmail.com>

> Sei que aqui tem muitas pessoas gentis, mas abro mão e não desejo mais
> ajuda, pois percebo que estou incomodando pessoas tão bem instruidas como
> Mantovani.
>

De boa cara... não vamos começar com drama aqui não.
Vamos resolver o problema...


> Ainda me retornou o erro:
>
> Use of uninitialized value $daddr in pattern match (m//) at
> /usr/lib/perl5/Net/RawIP.pm line 481, <> line 1.
>

Essa é fácil! =P
Mesmo problema do caso anterior:
"            daddr => &target,"

Troque por:
"            daddr => $self->{TARGET},"



> Use of uninitialized value in subroutine entry at
> /usr/lib/perl5/Net/RawIP.pm line 626, <> line 1.
> Use of uninitialized value in subroutine entry at
> /usr/lib/perl5/Net/RawIP.pm line 626, <> line 1.
>

Na sua sub send, logo depois de você fazer
"my $size = PacksSize->new;"

Coloque um:
say "TARGET = $self->{TARGET}";
say "PORT = $self->{PORT}";

Só para fins de debug =P


E depois cole seu código atual em um pastebin da vida, para facilitar a
conversa :)

[ ]'s
-- 
Bruno C. Buss
http://www.brunobuss.net
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20120420/91d46b21/attachment.html>