use strict;
# use utf8;
use lib "t/lib";
use Test::More tests => 23;
use Test::Data::Visitor::Encode;
use Encode;
BEGIN
{
use_ok("Data::Visitor::Encode");
}
{
use utf8;
# hashref
encode_utf8_ok( { "日本語" => "あいうえお" }, "encode_utf8 on hashref" );
# arrayref
encode_utf8_ok( [ "日本語", "あいうえお" ], "encode_utf8 on arrayref" );
# scalarref
encode_utf8_ok( \"日本語", "encode_utf8 on scalarref" );
encode_utf8_ok( bless({ "日本語" => "あいえうお" }, "Hoge"), "encode_utf8 on object" );
}
{
# hashref
decode_utf8_ok( { "日本語" => "あいうえお" }, "decode_utf8 on hashref" );
# arrayref
decode_utf8_ok( [ "日本語", "あいうえお" ], "decode_utf8 on arrayref" );
# scalarref
decode_utf8_ok( \"日本語", "decode_utf8 on scalarref" );
decode_utf8_ok( bless({ "日本語" => "あいえうお" }, "Hoge"), "decode_utf8 on object" );
}