Тип Perl не работает, как ожидалось, по числовым значениям

Question

Я в тупике от этого и явно отсутствует что-то основное. Кажется, что perl sort не работает с определенным набором значений. Вот часть тестового кода:

use strict; 

    my $i = 7; 
    my $j = 8; 
    my $k = 4; 

    print "before:$i:$j:$k\n"; 
    my @p = ($i, $j, $k); 
    ($i, $j, $k) = sort(@p); 
    print "after:$i:$j:$k\n"; 

    print "######################################\n"; 


    my $i = 23; 
    my $j = 24; 
    my $k = 7; 

    print "before:$i:$j:$k\n"; 
    my @p = ($i, $j, $k); 
    ($i, $j, $k) = sort(@p); 
    print "after:$i:$j:$k\n"; 

print "######################################\n"; 

Как вы можете видеть, оно работает, когда входные значения (7: 8: 4). Кажется, что не работает, когда значения (23: 24: 7)!

before:7:8:4 
after:4:7:8 
###################################### 
before:23:24:7 
after:23:24:7 
###################################### 

Answer 1

По умолчанию sort будет сортировать лексически. Итак, 23 и 24 приходят до 7 по той же причине, что bc и bd идут до g в словаре.

sort {$a <=> $b} @p даст числовой вид.

http://perldoc.perl.org/functions/sort.html для получения дополнительной информации.