#!perl -p
s/(\S*)( \S*)$/$&$2$1/for($_)x6