Petter Reinholdtsen wrote:
> 
> We got hit by the problem after trying to ignore it for a long time.
> 
> This one-liner trigger the bug:
> 
>   perl5 -MIO::Socket -e '$listen = IO::Socket::INET->new(Listen => 2, \
>         Proto => 'tcp',Timeout => 15,); $port = $listen->sockport;'
> 
> This one-liner give this output:
> 
>   Bad address family for Socket::unpack_sockaddr_in, got 528, should
>     be 2 at /local/lib/perl5/5.8.0/Socket.pm line 370.
> 
> I tested on perl 5.8.5, and the problem is still present there.

Has the definition of struct sockaddr_in something peculiar on your system ?

Reply via email to