【Perl】 日本語Podを正しく表示する

ウチの開発環境(CentOS 6.2)で少し前から、perldocコマンドでPodドキュメントを開くと、以下のような警告が良く見られるようになりました。

groffのバージョンが古いため、Wide Characterが正しく表示されない、という旨の警告のようです。ちなみにgroffのバージョンは1.18.1.4です。

まず、そもそもこの環境で日本語のPodを本当に読めないのか、ふと気になったので調べてみました。以下のようなモジュールを書いて検証してみます。

perldocコマンドで表示させると、次のように表示されます。

やはり、日本語の部分が表示されていません。

警告に従って、groffの最新版をインストールします。gnuのFTPサイトから最新版(1.21)を入手し、コンパイルしてインストールします。

ちなみに私の環境では、gcc-c++パッケージが不足していたため、途中で別途インストールしました。

インストール後、先ほどのPodが正しく表示されるかどうか確認してみます。

表示されることは表示されましたが、今度は制御記号らしきものが一緒に表示されてしまっています。これは端末上の文字に色を付けるためのエスケープシーケンスのようです。なぜこのように表示されるのか原因を調べたところ、私の環境で環境変数PAGERにlessと設定していたことが原因のようでした(psqlコマンドにページャを設定するために、このようにしていました)。

回避方法としては、環境変数PAGERを以下のように再設定します。

オプションの-Rは、テキストに上記のエスケープシーケンスが含まれる場合に、文字色を正しく端末上に反映します。

それでは、再度Podを表示してみます。

無事、エスケープシーケンスも消え、文字色も含めて正しく表示されるようになりました。

以上、簡単ですが日本語Podの話題をご紹介しました。