カナかな団の躁鬱

めも。

カナかな団の躁鬱システム（そんな素敵なもんじゃない）で、画像貼付けのための呪文。cgi の「使用禁止文字の置換」のトコロに、

$_[0] =~ s/\[IMAGE\/(.*?)\]/<img src="\/example\/$1" alt="">/g;

とか追加しちゃう。んで、書き込みの時に、[IMAGE/sample.jpg] とか書けは、自動的に img 要素に変換。アップローダ機能は無いので、所定のディレクトリに画像ファイルを置いておく必要が有るわけだが。

しかし、alt 属性が空欄ちゅーのもナニなので、代替文章も入れられるようにしようと。そこで、

$_[0] =~ s/\[IMAGE\/(.*?)\/(.*?)\]/<img src="\/example\/$1" alt="$2">/g;

という呪文に変更。[IMAGE/sample.jpg/サンプル] とか書くと上手い具合に代替文章も入ったね、と思ったら、マズイことに。そう、以前の呪文 [IMAGE/sample.jpg] が img 要素に変換せず、テキストのまま吐き出されてしまう。ありゃ、イカンです。ほんじゃ、両方の呪文が有れば、いいんじゃね、とか思ったので、

$_[0] =~ s/\[IMAGE\/(.*?)\]/<img src="\/example\/$1" alt="">/g;
$_[0] =~ s/\[IMAGE\/(.*?)\/(.*?)\]/<img src="\/example\/$1" alt="$2">/g;

としてみたが、片方にしか呪文が効かない。んじゃ、反対にしてみようということで、

$_[0] =~ s/\[IMAGE\/(.*?)\/(.*?)\]/<img src="\/example\/$1" alt="$2">/g;
$_[0] =~ s/\[IMAGE\/(.*?)\]/<img src="\/example\/$1" alt="">/g;

っていうふうにしたら、今のところ上手く行ってるようだから、ヨシとする。すげーインチキ。