perl -le '$_="filename.ext"; s/^(.*)\.([^.\s]*)$/$2:$1/; print($_);'