标签： perl sockets
我有IO::Socket::INET个{{3}}个数组的数组{/ 1}。
IO::Socket::INET
此循环
@dest
在调用foreach my $p (@dest) { my $peer = $p->peerhost(); }
foreach my $p (@dest) { my $peer = $p->peerhost(); }
Socket :: unpack_sockaddr_in的错误arg长度，长度为4，在/usr/lib64/perl5/5.20.2/x86_64-linux-thread-multi/Socket.pm line 830`应为16。
之前使用的是Perl v5.8.8