my @val = split(" ",$val);
my $v = join (":", @val);