perl XMLでsjisを使いたいと思って、探していたら、次のurlにある通りに行えば、問題なく使えるようになりました。
http://homepage3.nifty.com/hippo2000/perltips/xml/xmlenc.htm
さすが河合さん。
ちなみに先程のurlにある Encoding.tar.gz をダウンロードしてからの手順は、次の通りです。
$ cd ~/src/Encoding/mkenc $ cp /FreeInput/local/perl/lib/site_perl/5.8.8/i686-linux/XML/Parser/Encodings/x-sjis-cp932.enc . $ cp /FreeInput/local/perl/lib/site_perl/5.8.8/i686-linux/XML/Parser/Encodings/x-euc-jp-unicode.enc . $ /FreeInput/local/perl/bin/perl mkenc.pl x-sjis-cp932 shift_jis $ /FreeInput/local/perl/bin/perl mkenc.pl x-euc-jp-unicode euc-jp $ cd /FreeInput/local/perl/lib/site_perl/5.8.8/i686-linux/XML/Parser/Encodings $ cp ~/src/Encoding/mkenc/euc-jp.enc . $ cp ~/src/Encoding/mkenc/shift_jis.enc .