16x16 の履歴を GIFアニメ にする Perl スクリプト - 口から出まかせ16x16 の履歴画像を GIFアニメにすると面白そうだなぁと思ったので書いてみました。試しにセコンさんのエントリにあるこの画像 を変換すると こんな GIFアニメになります。やってることは簡単で、左上から順に 16x16 の画像を切り出して最後に GIFアニメとして書き出しているだけです。gif_delay とか gif_loop のオプションは perldoc Imager::Files の GIF の項に書いてあります。 追記 いちいち画像保存して変換するのめどいよねということで、履歴画像を表示した時の data:image/png;base64, で始まるデータスキームをフォームにコピペると GIFアニメを出力する CGI も書いてみました。
