$a='43 1 1 1243';map{$i++;$a=~s/$i/$_/g}'4324 4 4 43',' OH ',POP,LOLLI;print$a