... use English '-no_match_vars'; ... { local $INPLACE_EDIT = ".backup"; @ARGV = @files; while (<>) { s/$target/$replacement/g; print; } }