$_ =~ s/(\D[1-10])(\D[11-16]) ... /$3$4$1$2/g;