★三　【スクリプト改造工房 PART 8 】　★三

★三　【スクリプト� ..

711:nobodyさん
05/07/01 14:31:49
丸投げスレより舞い戻って？着ました
内容は以下の通り
【.　 CGI名　.】　Web Cart System PRO ver.5
【依頼期限】　毎日見てます
【配布先URL】　URLﾘﾝｸ(webcartsystem.com)
【ヘルプ内容】　登録した商品が真っ先に上に来るように設置したい（新着商品を上に出したいだけです）のですが
　　　　　　　　商品登録Noを変えても動かず、結局、CGIが吐き出すdb.txtを
　　　　　　　　全部入れ替えてやっと反映される状態です

CGIのTXTは全部ココに収納されています
URLﾘﾝｸ(ww4.enjoy.ne.jp)

で、write.txtに格納されている
open WRITE,"<db/$open_file" || die "Could not open the file";
@templine = <WRITE>;
foreach (@templine) {
if (/(.*):=:(.*):=:(.*):=:(.*):=:(.*):=:(.*):=:(.*):=:(.*):=:(.*):=:(.*)/) {
$page_num = $1;
}
}
close WRITE;

以上の項目ですが、ここにdb.txtへ吐き出す構文が居るのですが
コイツをソートする構文を入れてみたのですが（write.txt(149): @templine = sort @templine;）
上手く作動せず、途中で+1と記述されている部分を-1にしても吐き出しされません

ここまでは解ったのですが…的外れかも、しれません。
アドバイスをお願いします

次ページ