> > $addr = (gethostbyname("10.1.101.12"))[4];
> > $paddr = pack($template,AF_INET,$port,$addr);
>
> If you dump out $paddr right here, you'll see that the
> address portion is
> all zeros, so you're really binding to INADDR_ANY and not to
> the specific
> address. However, the AF_INET is still out of place on
> little-endian, so I
> can't figure out why it isn't barfing on that...
>
> > bind(MY_SOCKET, $paddr) || die "$0: Cannot bind .. $!\n";
correct. netstat shows it is using INADDR_ANY:
tcp 0 0 0.0.0.0:6668 0.0.0.0:* LISTEN
----
I took out the pack stuff and happily using sockaddr_in :)
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
