emacs lispで文字列挿入

hoge001
hoge002
     :
hoge100

みたいに単純に数字だけ変わっていく場合
emacs lispでしたみたいに書いて実行する。

(let ((ii 1))
  (while (<= ii 100)
(insert (format "hoge%03d\n"  ii))
(setq ii (+ ii 1))
)
  )