perl -pi.bak "s/vanilla/strawberry/gi" *.txt *.doc

##</code><code>##

perl -pi.bak "BEGIN{@ARGV=map glob,@ARGV}s/vanilla/strawberry/gi" *.txt *.doc