diff options
Diffstat (limited to 't')
-rw-r--r-- | t/data/utf8.json | 4 | ||||
-rw-r--r-- | t/utf8.t | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/t/data/utf8.json b/t/data/utf8.json index c65a4bc..1471bae 100644 --- a/t/data/utf8.json +++ b/t/data/utf8.json @@ -1,10 +1,10 @@ %% my $default = { color => '#000000', size => 14 }; %% format(normal => $default.merge({})); %% format(date => $default.merge({ num_format => 'd-mmm' })); -%% format(money => $default.merge({ bold => true(), num_format => u('_(¥* #,##0.00_);_(¥* (#,##0.00);_(¥* -??_);_(@_)')})); +%% format(money => $default.merge({ bold => true(), num_format => '_(¥* #,##0.00_);_(¥* (#,##0.00);_(¥* -??_);_(@_)'})); %% format(title => $default.merge({ bg_color => '#c6d9f0', pattern => 'solid' })); %% format(bold => $default.merge({ bold => true() })); -%% format(bold_money => $default.merge({ bold => true(), num_format => u('_(¥* #,##0.00_);_(¥* (#,##0.00);_(¥* -??_);_(@_)')})); +%% format(bold_money => $default.merge({ bold => true(), num_format => '_(¥* #,##0.00_);_(¥* (#,##0.00);_(¥* -??_);_(@_)'})); { "selection" : 0, "worksheets" : [ @@ -9,7 +9,7 @@ use Spreadsheet::ParseXLSX; use Spreadsheet::Template; my $template = Spreadsheet::Template->new; -my $data = do { local $/; local @ARGV = ('t/data/utf8.json'); <> }; +my $data = do { open my $fh, '<:encoding(UTF-8)', 't/data/utf8.json'; local $/; <$fh> }; { my $excel = $template->render( $data, |