テンプレートツールキットの文字エンコーディング

Question

テンプレートツールキットが正しくエンコーディングを処理していないようです。

ファイル名（テンプレートを取得する場所）、ハッシュリファレンス（すべてのパラメータを含む）、およびスカラーリファレンス（出力先を指定）を渡してから、それを返して順番に表示しますユーザー。

ウムラウト付きの文字列を入力すると、html出力には、すべての文字の代わりに白い疑問符（ただし、正しい文字数）の黒い菱形が含まれます。他のキャラクターはうまく出てきます。

テンプレート - >プロセスを呼び出す前に警告を使用していますが、この時点では、template->processの呼び出し中にガベージになってしまうことがわかります。

アイデア？ ENCODING => "utf8"とbinmode => ":utf8"の両方を使用しようとしましたが、どちらも出力に影響しません。

ここで私のコードは、テンプレート - >プロセスへの呼び出しを表示するために整えられています。{binmode => 'utf8'}を省略しても効果はありません。

<put variables in hash referenced to by vars> 
<print out variables in has referenced to by $var> 
my $data; 
$template->process($self->filename, $vars, \$data, {binmode => ':utf8'}) || die "Template process failed: ", $template->error(); 
return $data; 

あなたの答えのためのすべてのおかげで、問題は後のテンプレートプロセスはそのことをやっていたことであることが判明しねえ を解決し、我々は、我々はまた、それを出力する前に一時ファイルに文字列を書きましたファイルのためのbinmodeを設定するために必要な、コードは今のようになります。

<put variables in hash referenced to by vars> 
<print out variables in has referenced to by $var> 
my $data; 
binmode(STDOUT, ":utf8"); 
$template->process($self->filename, $vars, \$data, {binmode => ':utf8'}) || die "Template process failed: ", $template->error(); 
return $data; 

私はあなたのすべてに感謝し、あなたの時間のために:)

Answer 1

以下のコードは動作します。 $data、具体的には、含まれる文字列はPerl文字列、つまり適切にdecode dでなければなりません。 introduction to encoding in the official documentationを参照してください。

use Template '2.21_02'; 

my $tt = Template->new({ 
    ENCODING  => 'utf8', 
    # other options … 
}); 

$tt->process(
    $template, $data, $output, {binmode => ':utf8'} 
) or die $tt->error . ' in ' . $template; 

Answer 2

私のソリューションは、pにしましたすべての非ラテン文字は、実行時に[% loc('string') %]を経由してen.poに含まれているので、テンプレートはローカライズされていなければならないので、うまく動作します。