Perl で複数条件sort

業務で10年近くperl触ってるのに、普通にやる機会がなかった。 大体DBのorder by で済ましてる気がする。 ちなみに、ソート対象がundefのものが表にでては具合がわるい仕様なので出さないようにしている。order by のように昇順ではundefのものを最初に、降順では最後にもってくるにはもう一工夫が必要。(mysqlの話です。o…