use File::Spec;
use lib File::Spec->catfile($FindBin::Bin, 'lib');
-use utf8; # for literal below
-use Encode; # URI.pm is braindead wrt unicode-flagged characters
-
use Test::More tests => 5;
use_ok('TestApp');
my $uri_with_multibyte = URI->new($base);
$uri_with_multibyte->path('/');
$uri_with_multibyte->query_form(
- name => Encode::encode('utf8', '村瀬大輔'),
+ name => '村瀬大輔',
);
# multibyte with utf8 bytes