use strict;
use warnings;
use utf8;
use Test::More;
use Text::Xslate;
my $tx = Text::Xslate->new(
cache => 0,
);
is $tx->render_string(<<'T'), 10;
: my $h = { "こんにちは" => 10};
:= $h["こんにちは"]
T
is $tx->render_string(<<'T', { key => "こんにちは"}), 10;
: my $h = { "こんにちは" => 10};
:= $h[$key]
T
done_testing;