CGIで新着順に表示させたいのですが上手くいきません。

質問

CGIで新着順に表示させたいのですが上手くいきません。

http://www.wackyfactory.net/cgi/todo.txt
こちらのCGIを使わせてもらっているのですが、古い順に表示されてしまいます。

425行目の
foreach (@PICKUP) {
を
foreach (reverse(@PICKUP)) {
に変更し、そのページ内では新着順になったのですが
件数がたまり2ページに増えると新着の項目が2ページ目に表示されてしまいました。

良ければアドバイスなど頂けると有り難いです。

回答No.1

toraneko75

425行目は元に戻して
$page_control = $hit = $allhits = $all = 0;
if ($FORM{'action'} ne 'remove') { $start = (times)[0]; }

while (<READ>) {
となっているところを
page_control = $hit = $allhits = $all = 0;
if ($FORM{'action'} ne 'remove') { $start = (times)[0]; }
@REVERSE=<READ>;
while (reverse(@REVERSE)) {

に変えたら表示だけはうまくできそうです。
ただ、他の機能がうまく機能するかどうかわからないです。