△▲　WebProg 初心者の質問 Part8　▼▽

△▲　WebProg 初心者の質問 Part8　▼▽ at PHP

442:nobodyさん
04/04/23 00:08
PerlでCGIを組んで勉強中の者ですが、
ソートが上手く動かせず？に苦労しています。
URLﾘﾝｸ(www.din.or.jp)
を参考にしてるんですが、

@data = map {$_->[0]}
sort {$a->[2] <=> $b->[2]}
map {[$_, split /,/]} @data;

これは予定通りの動作を確認できるのですが、
アチラのページでお勧めされている高速版の、

@tmp = map {(split /,/)[2]} @data;
@data = @data[sort {$tmp[$a] <=> $tmp[$b]} 0 .. $#tmp];

上記のスクリプトはどうも上手くいきません。
なにぶん、最近始めたばかりなので、
僕の手落ちなのかも知れませんが、何卒ご教授下さい。
お願いします。

次ページ

続きを表示

1を表示