Bard's Tail - sagelo -
ずっと以前に紹介したことがある sagelo の
perl source code
と、表示用の
CSS file
です。酔狂にも使ってみたいと思われる方は、以下の点にご注意の上、
自己責任でひとつ。
- perl 5.8.1 以上で Compress::Zlib が必要です。
utf-8 以外の locale での動作は不明です。
- データファイルのパスは script の最初のほうを見て適当に変更してください。
- 定期的に magelo から全登録キャラのデータを取ってくるには、
cron なりなんなりで script を -a option つきで実行してください。
- 多数のキャラを登録して一気に magelo にデータを取りに行くと、
IP address が magelo の blacklist に載る可能性があります。
- emacs の info と web で適当に調べたぐらいの perl の知識で書いているので、
安全な script である保証はありません。security hole を見つけたら、
こっそり教えてください。
7月1日追記 どうも httpd によって perl に渡る ARGV の内容が違うらしく、危険な感じに誤動作する場合があったのを修正。CGI の INTERNET DRAFT 読む限り、?x=a みたいに '=' を含む形の QUERY_STRING が来たときは argv には何も入らないのが正しいと思うのだけど、そうでもないのかなあ。