perl -lpi -e 's/wrongs/wrongs3/' wrongs