$data1 =~ s/(\S)(\S)/$2$1/g;