Já fiz uma rápida do Google sobre o assunto, mas não conseguiu encontrar a resposta que eu quero.

Diga, existe uma matriz como este:
@ A \u003d qw (cd1 a1 EF a2 hij A12 b2 b4 B22);

Quero classificar o array na primeira ordem:
@ sorted \u003d qw (a1 a12 a2 b2 B22 b4 cd1 hij ef);

E de segunda ordem:
@ sorted \u003d qw (a1 a2 a12 b2 b4 B22 cd1 hij ef);

Existe uma maneira de fazer isso no Perl sem utilizar os módulos?

Muito obrigado!