Perlについての質問箱 4箱目
■ このスレッドは過去ログ倉庫に格納されています
0671デフォルトの名無しさん
NGNG以前作ってSolaris+Apacheで動かしてたときは、hoge.dirとhoge.pagができ
たんですが、今度、RedHat Linux 7.3+Apache1.3で同じのを動かしたら、
hoge.ndbm.dbという1ファイルしかできず、検索が効かなくなってしまいまし
た。
hoge.ndbm.dbの場合、検索は、以下のじゃだめなんでしょうか。(長すぎる
行があるって出るので改行してます。)
tie (%yoyaku, NDBM_File, "/var/www/html/yoyaku/yoyaku.ndbm", O_RDONLY, 0644)
or die "$!\n";
foreach (sort keys %yoyaku) {
if ($_ >= $today) {
@data = split(/\t/,$yoyaku{$_});
print "<tr><td>$data[0]年$data[1]月$data[2]日($data[10])</td><td>$data[3]時$data[4]分</td><td>$data[5]時$data[6]分</td>
<td>$data[7]</td><td>$data[8]</td><td>$data[9]</td></tr>";
}
}
untie %yoyaku;
■ このスレッドは過去ログ倉庫に格納されています