>>37
ご指摘ありがとうございます。
参考：Perlメモ - 特定の項目でソートする
ttp://www.din.or.jp/~ohzaki/perl.htm#SortST
を参考にして参ります。