Skip to content

Instantly share code, notes, and snippets.

@mori-dev

mori-dev/0を詰めて連番.el

Created January 26, 2010 14:18
Show Gist options
  • Save mori-dev/286866 to your computer and use it in GitHub Desktop.
Save mori-dev/286866 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
0を詰めて連番.el
(let ((i 0))
(while (< i 14)
(insert (format "\n%014d_vr.ezweb.ne.jp" i))
(setq i (1+ i))))
あるいは
(loop for i from 0 to 10
do (insert (format "\n%014d_vr.ezweb.ne.jp" i)))
00000000000000_vr.ezweb.ne.jp
00000000000001_vr.ezweb.ne.jp
00000000000002_vr.ezweb.ne.jp
00000000000003_vr.ezweb.ne.jp
00000000000004_vr.ezweb.ne.jp
00000000000005_vr.ezweb.ne.jp
00000000000006_vr.ezweb.ne.jp
00000000000007_vr.ezweb.ne.jp
00000000000008_vr.ezweb.ne.jp
00000000000009_vr.ezweb.ne.jp
00000000000010_vr.ezweb.ne.jp
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment