in reply to (Challenge)(for new users) Replacing a text

perl -pi -e 's/Will(?= Emigh)/YAPH/g' file

cheers

tachyon

In Section Seekers of Perl Wisdom