
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)