| Subject: | module does not accept upper case IPv6 addresses |
Following code failed with error "cannot assign addres":
my $ipv6 = "2002:C27E:65F2::D581:1AD5:BE0D";
my $socket = IO::Socket::INET6->new (
Domain => AF_INET6,
Proto => 'tcp',
Type => SOCK_STREAM,
Blocking => 0,
Timeout => 15,
LocalAddr => $ipv6,
PeerAddr => 2001:7d0::6666,
PeerPort => 6667,
);
when i lovercased IPv6 ip it all worked fine:
my $ipv6 = "2002:C27E:65F2::D581:1AD5:BE0D";
my $socket = IO::Socket::INET6->new (
Domain => AF_INET6,
Proto => 'tcp',
Type => SOCK_STREAM,
Blocking => 0,
Timeout => 15,
LocalAddr => lc($ipv6),
PeerAddr => 2001:7d0::6666,
PeerPort => 6667,
);
I have running:
OS: FreeBSD 4.9-RELEASE-p9
Perl: v5.8.5 built for i386-freebsd-64int
Module is latest (2.01 from freebsd port)