%perl -lne "s/Charlie Chaplin/George Bush/g;print" < myfile