#!/home/ben/software/install/bin/perl
use warnings;
use strict;
use utf8;
use FindBin '$Bin';
use lib 'lib';
use Net::IPv6Addr 'ipv6_parse';
my $ip = Net::IPv6Addr->new ('1:2:3:4:5:6:1.2.3.4');
print $ip->to_string_preferred (), "\n";
