TeXとはてな記法

上のエントリーで「何で行列かけねーんだ、はてな」とか思っていたら、かぎかっこはエスケープしないと使えないということに気がついた。あほす。

ということで、texで書いた数式のソースをはてなのtex記法で上げるには

  • かぎかっこはエスケープ
  • 改行取り除いて一行に
  • はてなのtex記法の印を付ける

という作業が必要になったのでperl書いた。置換の正規表現がまずいところもあるかもしれないが、まずいことが起きた時点で考えることにしよう。

use strict;
use warnings;
my $text="[tex:";
while(<STDIN>){
    chomp;
    s/(.*?)\[(.*?)/\\[/;
    s/(.*?)\](.*?)/\\]/;
    last if($_ eq "end");
    $text=$text.$_;
}
print $text,"]\n";

使いかたは「perl hatena_tex.pl」とやって変換したソースを張り付け→endでエンターを押すとおしまい。これ以降数式多発な日記になったらすいません。あ、はてなグループを勉強日誌にしちゃえばいいのか。