use strict;
use warnings;
use Test::More;
use t::Util;
use Term::Encoding;

my $TERM_ENCODING = Term::Encoding::term_encoding();
my $ENCODING_IS_UTF8 = $TERM_ENCODING =~ /^utf-?8$/i;

plan skip_all => 'This test can run on utf-8 system' unless $ENCODING_IS_UTF8;

my $out = run_test('t/plx/typester.plx');
like $out, qr/1はOKなはず！/;

done_testing;