tomi-ruのモバイル日記

profile
記事とカテゴリ一覧はこちら

2007-12-28

Catalyst + Encode::JP::Mobile + TT

13:10 | はてなブックマーク - Catalyst + Encode::JP::Mobile + TT - tomi-ruのモバイル日記

use Catalyst qw(

    MobileAgent
    Unicode::Encoding
);

で、

use Encode::JP::Mobile;
use Encode::JP::Mobile::Charnames;

$Catalyst::Plugin::Unicode::Encoding::CHECK = sub {
    sprintf '[%s]', Encode::JP::Mobile::Charnames::unicode2name(shift);
};

sub begin : Private { とかで
    my ($self, $c) = @_;

    $c->encoding(do {
        $c->req->mobile_agent->is_docomo     ? 'x-utf8-docomo'
      : $c->req->mobile_agent->is_ezweb      ? 'x-utf8-ezweb'
      : $c->req->mobile_agent->is_softbank   ? 'x-utf8-softbank'
      : $c->req->mobile_agent->is_airh_phone ? 'x-utf8-docomo'
      : 'utf-8';
    });

でテンプレートをutf-8ひとつにできる

テンプレートには

   $c->stash->{p} = sub {
        chr eval '0x'. shift;
    };

みたいなのを渡して

[% p("E652") %]

とするとか

なんかで試してみよう

と、思ったら大掃除タイムが始まった

トラックバック - http://mobilehacker.g.hatena.ne.jp/tomi-ru/20071228