[Perl] Función sort

[Caster]

Buenas, tengo un problema con la función sort, y es que solo ordena las primeras cifras de un número, busqué en la documentación de perl, pero viene todo en inglés y no entiendo nada. Tengo este código:

Código (perl) [Seleccionar] Expandir

#!/usr/bin/perl

use warnings;
use strict;

my @array = (5, 4, 1, 3, 7, 6);
@array = sort @array;
print $array[0] . "\n";
print $array[1] . "\n";
print $array[2] . "\n";
print $array[3] . "\n";
print $array[4] . "\n";
print $array[5] . "\n";
La función sort ordena bien los números y la salida es la esperada, pero cuando cambio un elemento del array por un número de dos cifras, únicamente ordena la primera cifra, un ejemplo:

Código (perl) [Seleccionar] Expandir

#!/usr/bin/perl

use warnings;
use strict;

my @array = (5, 43, 45, 3, 7, 6);
@array = sort @array;
print $array[0] . "\n";
print $array[1] . "\n";
print $array[2] . "\n";
print $array[3] . "\n";
print $array[4] . "\n";
print $array[5] . "\n";
La salida de este codigo es

2
3
43
45
5
6

Las unicas cifras que está ordenadas son las primeras.

Saludos

[csp]

Mirá acá:

http://stackoverflow.com/questions/6454744/sort-function-in-perl

[Caster]

Muchas gracias