Hm, it looks like you somehow change "Peer" to "Local" when you moved those lines. Change "Local" back to "Peer" and try again.
Update: Note the >>>Tagged<<< parts:
so the code should look like this:To this....while ($socket->recv(my $in, 1024) ) { my $sock = IO::Socket::INET->new( Proto => 'udp', >>>Peer<<<Addr =>'127.0.0.1:50000'); print $sock $in; }my $sock = IO::Socket::INET->new( Proto => 'udp', >>>Local<<<Addr =>'127.0.0.1:50000'); while ($socket->recv(my $in, 1024) ) { print $sock $in; }
- tye (but my friends call me "Tye")my $sock = IO::Socket::INET->new( Proto => 'udp', PeerAddr =>'127.0.0.1:50000'); while ($socket->recv(my $in, 1024) ) { print $sock $in; }
In reply to (tye)Re3: IO:Socket::NET problem & Counter-Strike
by tye
in thread IO:Socket::NET problem & Counter-Strike
by Myron DaChump
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |