Re: IPv6 Supported Perl Modules

[VinsWorldcom]

Net::Telnet does support IPv6 - although not natively. By that, I mean, you can't do a:

Net::Telnet-new(host => 'IPv6.host.com');

I've been corresponding with Jay Rogers - author of Net::Telnet - to add native IPv6 support. He gave me a brilliant workaround that is very easy and not at all kludgey as many workarounds go.

Use the 'fhopen' argument of the new() constructor to take in an IPv6 connection (from say IO::Socket::IP). This is the example that works brilliantly for me:

use IO::Socket::IP -register;
use Net::Telnet;

...

my $socket = IO::Socket::IP->new(
    PeerHost => $IPv4orv6Host,
    PeerPort => 23,
    Family   => AF_INET # or AF_INET6
) or die "not connected\n";

my $session = Net::Telnet->new(
    fhopen => $socket
);

...

That will continue to work legacy is $IPv4orv6Host is an IPv4 host or hostname that resolves to an IPv4 address and will also support IPv6 hosts - since IO::Socket::IP can handle the IPv4/v6 address families. The Net::Telnet 'fhopen' argument simply operates on the open $socket handle.