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