IO::Socket::INET6->new( 'ipv6.google.com' ); # IP6 IO::Socket::INET6->new( 'www.google.com' ); # IP4
@Net::SMTP::ISA = qw(Net::Cmd IO::Socket::INET6)
use Net::INET6Glue::INET_is_INET6
use Net::INET6Glue::INET_is_INET6; use LWP::Simple; print get( 'ipv6.google.com' ); # IPv6 print get( 'www.google.com' ); # IPv4
use Net::SSLGlue::LWP
use Net::INET6Glue::FTP; my $ftp = Net::FTP->new( '[::1]:1121' );
$valid_ip6 = eval { Socket6::inet_pton(...) }
$equal = inet_pton($a) eq inet_pton($b)