%25EF%25BC%258BUTF8)
Perl/フレームワーク（MVC）/Sledge/Apache2(mod_perl2)＋UTF8 - ありんく tech-wikiSledge::Request::Apache2::I18N † package Sledge::Request::Apache2::I18N; use utf8; use warnings; use strict; use vars qw($VERSION); $VERSION = '0.01'; use base qw(Class::Accessor::Fast); __PACKAGE__->mk_accessors(qw(req)); use vars qw($AUTOLOAD); use Sledge::Request::Apache2::I18N::Upload; use Apache2::Request; use Apache2::Upload; use Encode; sub new { my($class, $r) = @_; bless { req => Apache2:
