Encode::encode で変換できない文字を 〓 にする

use utf8;
use Encode;

my $geta = Encode::encode($encoding, '〓');
Encode::encode($encoding, $str, sub { $geta });

とすればよい。

なお、Amon2 においては、encode_html() というメソッドがあるので、ここを上書きすることにより、表示不可能な文字列を入力するべき個所において〓を出力することができる。

【20110218 追記】
コードを修正した

Published: 2010-11-26(Fri) 09:58