perl -pe 's/(.*?)\s+(r[0-9]+\.[0-9]+)/$2 $1/'