perl objet problème avec l'instruction "sort"?

Version imprimable