A「テストデータで氏名欲しいんですが、考えるのめんどうだしなんかないっすか」
B「PHP だと昔こういうの書いたよ https://gist.github.com/202947」
俺「それパクって俺も Ruby 版作ったよ! https://gist.github.com/218483/」
C「elisp 版ないんすか?(ニヤニヤ」
俺「ぐぬぬ」
というわけで作ってみました。
なんか既にありそうだけど気にしない。
SKK の人名辞書ファイルから架空の氏名を生成する fake-full-name.el — Gist
;;; Usage: ;; ;; (require 'fake-full-name) ;; ;; 人名を生成します ;; ;; (ffn:generate) ;; ;; ffn:generate を実行する度に次の人名を生成します ;; ;; ※ 初回実行時に人名リストを構築するため、少し時間がかかります。 ;; 二回目以降はキャッシュを利用するので速いです多分。 ;; ;; (ffn:generate) ;; => "中渓 文我" ;; (ffn:kana) ;; => "なかたに ぶんが" ;; (ffn:kanji) ;; => "中渓 文我" ;; ;; (ffn:generate) ;; => "栃本 奈美江" ;; (ffn:kana) ;; => "とちもと なみえ" ;; (ffn:kanji) ;; => "栃本 奈美江" ;; (ffn:last-kana) ;; => "とちもと" ;; (ffn:first-kana) ;; => "なみえ" ;; (ffn:last-kanji) ;; => "栃本" ;; (ffn:first-kanji) ;; => "奈美江" ;;
使い方はこんな感じです。
なんかごちゃごちゃしてるからもっとすっきり書けるかも!だれか赤ペン先生!!