package TestApp::Controller::Root;
use strict;
use base 'Catalyst::Controller::Mobile::JP';
__PACKAGE__->config->{namespace} = '';
use Encode;
sub param_test :Local {
my ($self, $c) = @_;
$c->res->body(
$self->encoding->name . '/' .
Encode::encode('ascii', $c->req->param('text'), Encode::FB_XMLCREF) . '/' .
$c->req->param('text')
);
}
sub fallback_test :Local {
my ($self, $c) = @_;
$c->res->content_type('text/plain');
$c->res->body("\x{E6D1}\x{F094}\x{E309}");
# [DoCoMoにしかないiモードマーク][auにしかないEZマーク][Softbankにしかないトイレ]
}
sub htmlspecialchars_test :Local {
my ($self, $c) = @_;
$c->res->content_type( $c->req->param('content_type') );
$c->res->body("\x{ECA2}"); # DoCoMoにないauの顔 (>3<)
}
1;