欧文 iso-8859-1　と　日本語 euc-jp　の混在するウェブページ

Question

フランス語圏の人と日本人が、お互いの文化や語学について話し合うフォーラム形式の掲示板をPerlで制作したいのですが、フランス語には英語にないアクセント付のアルファベットがあり、一つのログファイルに二つの文字コードが混在すると一方が化けてしまいとても不便です。

　Unicodeを使えば解決するのでしょうが、具体的にどうすれば良いのかわかりません。　jcode.plのように簡単に文字コードを変換してくれるモジュールでもあるのでしょうか。　それとも全く違う方法で解決できるのでしょうか。

　初心者なので、なるべくわかりやすく説明していただければ幸いです。　よろしくお願いします。

proust · Accepted Answer

惜しいのですがログファイルの保存形式が違います。ログファイルもスクリプトなどと形式をあわせる、つまりutf-8にする必要があります。いい加減なスクリプトを書いて試したところ、 WindowsXP + IE6/Opera7の環境では、正しく入力・表示できています。以下に載せます。 #!/usr/bin/perl #テスト用に作成したもので、セキュリティ対策や #ロックなどの通常欠くべからざる処理をはしょって #います。このまま使用しないでください sub mourir { my ($erreur) = @_; print "Content-type: text/plain "; print "error $erreur"; exit 0; } sub decoder { my ($enigme) = @_; $enigme =~ s/%([0-9a-fA-F].)/{chr(hex('0x'.$1))}/ge; return $enigme; } sub laver { my ($morceau) = @_; $morceau =~ s/\&/\&/g; $morceau =~ s/\ FDP unless (defined($ENV{'CONTENT_LENGTH'})) { print ""; exit 0; } $longueur = $ENV{'CONTENT_LENGTH'}; open dfo, ">>$fichier" || mourir $!.':1:'.__LINE__; print dfo "

";
while ( 0 < ($resultat = read(STDIN, $morceau, $longueur))) {
        print dfo $morceau;
        $longueur -= $resultat;
        last unless $longueur;
}
print dfo "

"; close dfo || mourir $!.':3:'; print "Et voici..."; open dfi, $fichier || mourir $!.':4:'; while( ) { print decoder($_); } close dfi || mourir $!.':5:'; print < FDC

proust · Answer

ログの表示等で１画面に日仏両言語を混在させるなら、
たぶん「UTF-8」を使用するのがいいかなと思います。

今手元に環境がないので試していませんが、
表示するページの「レスポンスヘッダ」に
Content-type: text/html; charset=utf-8
をつけ、なおかつHEADエレメント内に
<meta http-equiv="content-type" content="text/html; charset=utf-8">
を書けば、utf-8の内容でform入出力できそうです。
ログファイルには、formから入力されたままの
形式で保存しておけばよいと思います。

ただし、cgi/htmlの漢字はutf-8対応のエディタで
書いておく必要があります。

参考URL：http://euc.jp/i18n/charcode.ja.html

欧文 iso-8859-1 と 日本語 euc-jp の混在するウェブページ

惜しいのですがログファイルの保存形式が違います。

ログの表示等で１画面に日仏両言語を混在させるなら、

関連するカテゴリからQ&Aを探す

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

欧文 iso-8859-1　と　日本語 euc-jp　の混在するウェブページ