perl -e "rename('newfile.txt', 'originalfile.txt')"