J'ai fait un Google rapide à ce sujet, mais n'a pas pu trouver la réponse que je veux.

Dire, il s'agit d'un tableau comme ceci:
@ A \u003d qw (cd1 A1 EF A2 hij A12 B2 B4 B22);

Je tiens à trier le tableau dans le premier ordre:
@ sorted \u003d qw (a1 a12 a2 b2 b22 b4 cd1 hij EF);

Et du second ordre:
@ sorted \u003d qw (A1 A2 A12 B2 B4 B22 cd1 hij EF);

Est-il possible de faire dans la Perl sans utiliser les modules?

Merci beaucoup!