How to create a temporary file in Emacs Lisp?

(make-temp-file "foo-") ;; "/tmp/foo-BaXkII"

(let ((file (make-temp-file "foo-")))
  (write-region "foo bar baz" nil file)
  (find-file file))