Perlの最適化器はかなり頑張ってsort()の最適化を試みている。具体的には，配列をその場で直接ソートする場合，数値または整数でソートする場合，ソートブロックの$aと$bを単純に入れ替えた場合において，最適化された高速なバージョンが使われる。 以下はす…