>perl -MIO::Socket::IP -e "print$IO::Socket::IP::VERSION"
0.37
>perl -MSocket -e "print$Socket::VERSION"
2.021

##</code><code>##

Output :: 
perl -MIO::Socket::IP -E "my $sock = IO::Socket::IP->new(PeerHost => qq(2620:0:1aa0:8070:1:88:200:e78f),  PeerPort => 80, Timeout => 10 ) or die $@;  say $sock->peerhost"
nodename nor servname provided, or not known at -e line 1.

##</code><code>##

perl -MIO::Socket::INET6 -E "my $sock = IO::Socket::INET6->new(PeerHost => qq(2620:0:1aa0:8070:1:88:200:e78f),  PeerPort => 80, Timeout => 10 ) or die $@;  say $sock->peerhost"
2620:0:1aa0:8070:1:88:200:e78f

##</code><code>##

cpan > force install Socket