Does that include the surname in the changed version? Or am I missing something?

Take a look! Just inspect the source of this page. My solution replace all occurrence of Will Emigh with YAPH Emigh.
Boris

If the phrase split across a line break does not count then it is easy. If it does count then it is rather hard to do in a one liner without being clunky..

# No worries about line breaks
perl -i -pe's/Will Emigh/YAPH Emigh/g' 

# line breaks concern me but STDOUT will do
perl -pe'$a.=$_}{$_=$a;s/Will(\n*) (\n*)Emigh/YAPH\1 \2Emigh/g'

# line break concern me and lets put it back in the file
perl -ne'BEGIN{$f=$ARGV[0]}$a.=$_}{$_=$a;s/Will(\n*) (\n*)Emigh/YAPH\1
+ \2Emigh/g;open F,">$f";print F $_'
[download]

Cheers,
R.

Well, I'm a newbie, so a rummage through perlrun (thanks for the hint) got me there. I'll hide this behind a readmore, just in case anyone else wants a go...

Update: not including the filename at the end, 37 chars

And with -w...

# perl -wpi -e 's/Will( Emigh)/JAPH\1/g' FileName
\1 better written as $1 at -e line 1.
#
[download]

antirice    
The first rule of Perl club is - use Perl
The ith rule of Perl club is - follow rule i - 1 for i > 1

Is this what you are looking for?