スゲい簡単なPerl入門 9th Day  PerlとかRubyとかコマンドで UUID を作るときのそれっぽい方法 ref: http://qiita.com/mugyuu/items/953639970f9a628c8426