CSVエディタのデータを呼び出すとき、古い順や新しい順の他に、
あいうえお順を選択できるようにしたいのです。
辞書CGIなどのCSVデータを管理するには、重宝すると思います。
よろしくお願いいたします。
（申し訳ないですが、当方CGIはあまりわかりません。
「理解できなくてもいいからとりあえずこうしてみろ」
というご指示を頂ければ、と思います。）

ASCIIコード順にソートでしたら、簡単に1,2行で改良できます。
(たぶん、以前にもこんな質問があったような。。。)
line136あたりの

foreach $data (@NEW){

直前くらいで、ソートするとよいでしょう。
具体的に、コードは、

@NEW=sort{($m{$a}||=(split(/\,/,$a))[2]) cmp ($m{$b}||=(split(/\,/,$b))[2])}@NEW;
か、
@NEW=map{$_->[0]}sort{$a->[1] cmp $b->[1]}map{[$_,(split(/\,/,$_))[2]]}@NEW;

で、よいかと思います。大量のレコード(行)がある場合は、次のでよいかと。

@tmp=map{(split(/\,/,$_))[2]}@NEW;
@NEW=@NEW[sort{$tmp[$a] cmp $tmp[$b]}0..$#tmp];

ソートを選択させるのは、フォームから"どのソートにするか"っていうものとして
ひっぱってきた文字または数字などで、うまくできるでしょう。

もうしわけありません。

foreach $data (@NEW){

が見つからないのですが……。

http://www.rescue.ne.jp/cgi/csveditor/csvedit.txt

ここからダウンロードしたCGIについての質問だったのですが、
この中にありますでしょうか？

失礼しました。簡易DBだと思ってました。

でも、本質的に同じようなので、改良個所は、場所と少々の修正でOKなはずです。

場所は、158行目あたりの
foreach $num ($start..$to){
の直前あたり（これは、CGIの分かる方なら別にこことは限定しない。）
で、さきほどの（昨日の）コードを修正して挿入してみてください。

修正するのは、@NEW配列を@BASE配列に換えるだけです。
これで、NAMEをASCIIコード順にソートされるはずです。

並び変わりました！
動作するようになったのを確認できました。

……が。すみません！
ソートしたい項目が何番目であるかをきちんとお伝えしておりませんでした。

「NAME」の項目ではなく、一番最初の、デフォルトでは空欄になっている項目を、
ソートの対照としたかったのです。

ご指示いただきましたプログラムで、どこを修正すればよろしいでしょうか。
何度も申し訳ありませんが、再度ご教授いただけますようお願いします。

(何をどうしたいのかを明記するのは基本ですよね……以後気をつけます；；)

NAMEでない属性でソートしたいのなら、最初のcammaでsplitして配列からとり出す値
を2番目から違った値にすりゃいいですよ。
こんかい一番最初の未定義っていうものなんで、0番目とするとよいでしょう。
(比較対象が、文字列でない場合、'cmp' を '<=>'としましょう。)
つまり、

@BASE=sort{($m{$a}||=(split(/\,/,$a))[0]) cmp ($m{$b}||=(split(/\,/,$b))[0])}@BASE;
か、
@BASE=map{$_->[0]}sort{$a->[1] cmp $b->[1]}map{[$_,(split(/\,/,$_))[0]]}@BASE;
か、
@tmp=map{(split(/\,/,$_))[0]}@BASE;
@BASE=@BASE[sort{$tmp[$a] cmp $tmp[$b]}0..$#tmp];

でしょうか。

挿入位置をミスりました。

73行目あたりの 
close(IN);
の直後で。