(goto-char (point-min))
(when (re-search-forward "^@setfilename.*$")
  (replace-match "@setfilename mew.info"))

(goto-char (point-min))
(when (re-search-forward "^@set jp$")
  (replace-match "@set us"))