nDiki : Locale::Maketext

インストール WiKicker Perl JSON File::Spec 正規表現 PAR Perl でデータベース処理 SWF wxPerl リファクタリング IDNA::Punycode Perl モジュール IPC::ShareLite Devel::LeakTrace Module::CoreList Perl v5.6.2 HTTP::Daemon Tie::File コマンドライン引数 Config::IniFiles libwww-perl nDiki URI::Fetch Getopt::ArgvFile Perl でキャッシュ処理 Module::Install Perl v5.8.0 usr Devel::SmallProf

■ [ WiKicker ] Locale::Maketext による localization

リファクタリングにあわせて、表示の localization を開始。 といっても、とりあえず日・英のみ。 Local::Maketext モジュールを使用することにする。 HTTP の Accept-Language リクエストヘッダによる言語の判別もモジュールがやってくれるのでお便利。 コレ、Perl v5.8.0 からは標準で入っているのだがそれより前のバージョンでは自前でインストールする必要あり。

メッセージはこれで順次リソース化していけるのだがまだ日時表示など日本語向けにハードコーディングしている場所があり、こちらの手直しも必要。

• WiKicker 0.35 リリース - 添付機能の修正など (2006-06-20)
• [ WiKicker ] 続L10N改善と、ページ名リスト処理の高速化 (2004-05-29)
• WiKicker における PageName 最長文字数 (2006-06-10)
• Rubric でプライベート SBS を立てるも 0.140 では日本語に不具合 (2006-07-22)
• Windows 上での Apache 2.0.53 では PATH_INF... (2005-04-10)

■ [WiKicker] WiKicker の文字化け対応

WiKicker の文字化けであるが Perl v5.6.x という環境が怪しそう。 ということで、ローカルに Perl v5.6.2 を入れてテスト。

 tar zxvf perl-5.6.2.tar.gz
 cd perl-5.6.2
 rm -f config.sh Policy.sh
 sh Configure -de -Dprefix=/usr/local/perl-5.6.2
 make
 make test
 make install

で /usr/local/perl-5.6.2/bin/perl -MCPAN -e shell でもりもり必要なモジュールをインストール。

で WiKicker のテスト。化けた。 追いかけてみると、Locale::Maketext モジュールが use utf-8 をしているため、l10n した文字列は UTF-8 として mark されてしまっているようだ*1。 で、mark されていない他の部分の(バイト列としてのUTF-8)文字列と結合したりしたところで化けたと。

ということで、Perl v5.6.x では maketext で帰ってきた文字列の UTF-8 mark を外すようにする。

 if (5.006 <= $] && $] < 5.7) {
     return eval "no utf8; my \$tmp = \$language_handle->maketext(\@param); \$tmp =~ /^(.*)\$/; \$1";
 }

という緊急処置コード。 Perl 5.0005_03 では utf8 プラグマ自体が無いので、eval の中に入れておく。 v5.6.x での UTF-8 mark の外し方が良くわからないので、とりあえず正規表現に全マッチさせるというダサいコード(v5.8 だと utf8::* にそこら辺の関数があるのだが)。

• YAML Perl モジュール (2004-05-19)
• Rubric でプライベート SBS を立てるも 0.140 では日本語に不具合 (2006-07-22)
• 野良パッケージと依存 Perl モジュールのインストールセット を CPA... (2006-02-12)
• 野良パッケージと依存 Perl モジュールのインストールセット をCPAN... (2006-02-11)
• [ WiKicker ] SpeedyCGI (2003-10-17)