ＣＧＩのカスタマイズについて
ネットレスキューさんの簡易データベースについて
search.cgiの表示部分でテーブルを一つずつ生成させようと思ったのですがエラーが出ます。
どこが悪いのでしょうか？
----------ここから-------
foreach $data (@NEW) {
($d,$DATE,$PREF,$NAME,$EMAIL,$HURL,$AGE,$HANDLE,$REM) = split(/\,/,$data);
print "<table width="450" border="0" cellspacing="0" cellpadding="0" class="p12_16">\n";
print "<tr>\n";
print "<td colspan="2" bgcolor="#CC0033" height="14"><font color="#FFFFFF">● $NAME</font></td>\n";
print "</tr>\n";
print "<tr>\n";
print "<td width="70">地域</td>\n";
print "<td width="380">$PREF</td>\n";
print "</tr>\n";
print "<tr>\n";
print "<td height="14">Ｅメール</td>\n";
print "<td><a href=\"mailto:$EMAIL\">$EMAIL</a></td>\n";
print "</tr>\n";
---中略----
print "<td height="14">内容</td>\n";
print "<td>$REM</td>\n";
print "</tr>\n";
print "</table>\n";
if ($next_num ne '') {
while (($key,$val) = each %FORM2) {
if ($key ne 'FF') { $buf = "$buf&$key=$val"; }
}
print "<h3>↓<a href=\"search.cgi?$buf&FF=$next_num\">次の$page件</a></h3>\n";
}
}
print "</body></html>\n\n";
exit;
--------------ここまで-----
splitの扱い方が良く分っていません。
御存知の方御指導下さいませ。
お礼
わかりやすい回答ありがとうございました。