#!/usr/bin/env emacs --script

(defun modify(filename)
  (find-file-literally filename)
  (goto-char 3)
  (insert "x39")
  (save-buffer 0)
  (kill-buffer))

(modify "a.txt")

abcdefg

ab9defg