$str =~ s/(\w{16}(?=\w)/$1 /g ;