どなたかよろしくお願いします。


『簡易データベースの改造で検索結果の昇順を自由に変更したい。』
にあります様のとおり変更しました。
@sorts = sort { (split(/,/,$b))[2] cmp (split(/,/,$a))[2] } @NEW;
foreach $data (@sorts) {

		($NAME,$SEX,$EMAIL,$AGE,$PREF,$REM) = &DecodeCSV($data);




1ページ以内なら正しく表示することができました。
ページをまたぐとページ毎のソートになり順番どおりになりません。

@NEWの中身が検索後の結果であれば、
検索前のデータをソートにかけてしまえば良いのではないでしょうか？
方法はおおよそ同じだと思います。