▼スレッド
│
└◇858:文字化け [ピーターラビット] 01/15 12:34

　└◇861:Re:文字化け [moon] 01/15 
　　└◇866:Re[2]:文字化け [ピーター] 01/16 <

WinXPでAN HTTP,ActivePerlを使用しています。
配列を学ぶために以下のスクリプトを書きました。
------------------------------------------
#!/perl/bin/perl
use strict;
use warnings;
use CGI qw(:standard);
my @abc2 = ("山田太郎","甲子園","A","33");
print header;
print start_html("test3");
print h1(@abc2[0]);
print h1(@abc2[1]);
print h1(@abc2[2]);
print h1(@abc2[3]);
print end_html;
-------------------------------------------
これを実行すると文字化けします。
******************************************
ŽR“c‘¾˜Y
bŽq‰€
A
33
******************************************

どうすれば文字化けしなくなるでしょうか?

あっしの環境（Win2000/Apache/ActivePerl）では大丈夫でした。
ただし、ヘッダーの文字コード設定が間違っているのでエンコードして表示するとと言う条件で。

use CGIとかあんまり使ったことがないのでよく分かりません。


あと別のことですが
print h1(@abc2[0]);
は間違いです。
print h1($abc2[0]);
とするのが正しいです。（どっちも表示できちゃうけど）
詳しくはググってください。

moonさん。
ありがとうございます。
検索しまくって、なんとか文字化けは直りました。
私はCGIを始めたばかりなので、またいろいろと教えてください。