Perl IPv6 address expansion/parsing -
i have address 2001:db8::1 in scalar, , expanded form, 2001:0db8:0000:0000:0000:0000:0000:0001. main perl package ship - in vast forest in /usr/lib/perl5/... - module this? if not, have few lines this?
cpan has net::ip can need.
here's transcript showing in action:
$ cat qq.pl use net::ip; $ip = new net::ip ('2001:db8::1'); print $ip->ip() . "\n"; $ perl qq.pl 2001:0db8:0000:0000:0000:0000:0000:0001
Comments
Post a Comment