Extension3

writebackプラグインのASCII判定（平仮名判定）がなんだかうまくいかないので修正してみました。

修正するのは以下の部分。

# block: No Hiragana
my $temp = param('comment') . param('excerpt');
$temp = Jcode->new($temp)->utf8 if param('excerpt');

この後に以下の1行を追加します。Perl5.8の仕様でUTF-8のフラグを立ててあげないとうまくいかない模様。

utf8::decode($temp);

結構手抜きだったりします。とりあえずうまくいくみたいなので良しとします。