perl -lpe "s/wrongs/wrongs3/" wrongs >wrongs2