#1108(海豚氏)の書き込みを引用します:

あ！どうもその様です。ありがとさんです。

話は変わりますが、
  foreach $line (sort @CS) {
      ($a01,$a02,$a03) = split(/\,/, $line);
	print "<center>$a01</center>\n";
  }
というのがあってこの場合のソートは「$a01」にかかってしまうのでしょうか？
「$a03」をソートしたい場合どの様にすれば宜しいのでしょうか？
こんな説明で分かるのだろうか？
また日本語ソート「あ〜ん」の平仮名のみでいいのですが
こんなソートって出来ますでしょうか？
よろしくですぅ。