| タイトル | ： 今こんな感じです。 |
| 投稿日 | ： 2012/03/19(Mon) 20:24 |
| 投稿者 | ： km |
[Mon Mar 19 20:10:13 2012] [error] [] malformed header from script. Bad header=<html lang="ja">: /virtual/www/user_info4.cgi
Scalar value @item[$i] better written as $item[$i] at /virtual/www/user_info4.cgi line 62.
Use of uninitialized value at /virtual/www/user_info4.cgi line 62.
Use of uninitialized value at /virtual/www/user_info4.cgi line 68.
Use of uninitialized value at /virtual/www/user_info4.cgi line 70.
[Mon Mar 19 20:10:15 2012] [error] [] malformed header from script. Bad header=<html lang="ja">: /virtual/www/user_info4.cgi
62-78のソースはこんな感じです。
61 foreach $i (0 .. @item){
62 print "<th style=\"text-align:center;\">【@item[$i]】</th>\n";
63 }
64 print "</tr>\n";
65 $pcount = 1;
66 # 各行を読み出し
67 for ($count=0; $count<=$line; $count++){
68 my($date,$name,$todouhuken,$adress,$tel,$email,$gender,$birth,$question,$ans,$pay) = split(/,/,"$data[$count]");
69 # データ一致するか？(検索用データ&読み込んだデータ)
70 if($SeekData eq $date){
71 print <<"_EOM_";
72<tr>
73# Shift-JISにする？
74# 文字コードをShift-JISからEUC-JPに変換
75<!-- あ(MOJIBAKE TAISAKU) -->#文字化け対策①
76print "<!-- \xfd\xfe(MOJIBAKE TAISAKU)-->\n";#文字化け対策②
色々いじって、試しての繰り返しです・・・